Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1568to1572
1568to1572
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Von Zelle zu Zelle springen mittels "TAB"

Forumthread: Von Zelle zu Zelle springen mittels "TAB"

Von Zelle zu Zelle springen mittels "TAB"
24.07.2017 20:45:14
Becker
Hallo zusammen,
ich benötige eure Hilfe für ein bestimmtes Makro.
Beim Drücken der "TAB-Taste" möchte ich gerne von einer ausgewählten Zelle in eine bestimmte Zelle springen.
Beispiel:
Zelle B1 ist ausgewählt, wenn ich jetzt TAB drücke, möchte ich zu Zelle D2 springen und diese soll dann ausgewählt sein. Habe ich aber in meinem Arbeitsblatt C1 ausgewählt, dann möchte ich mittels TAB zu E2 gelangen.
Gibt es dazu Lösungsvorschläge?
Vielen lieben Dank im Voraus.
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
25.07.2017 09:17:20
yummi
Hallo Becker,
das kannst Du über den Blattschutz realisieren, Die zellen, die angesprungen werden dürfen nicht sperren und dann im Blattaschutz festlegen, Benutzer dürfen gesperrte Zellen nicht auswählen
Gruß
yummi
AW: Von Zelle zu Zelle springen mittels "TAB"
25.07.2017 10:37:56
Becker
Hallo yummi,
danke erstmal für die schnelle Antwort. Ja über den Blattschutz kann man das meist regeln. Aber nicht im meinen Beispiel :-(...
Deswegen habe ich meine Datei beigefügt.
https://www.herber.de/bbs/user/115032.xlsx
Ich möchte das folgende TAB-Reihenfolge ist.
AB3-F9-AB9-G11-J15-J17-AD15-AD17-J22-J24-J26-I40-R40-I47-R47-I50-R50-I53-R53-I62-R62-I69-R69-I76-I83-I90-R90-I97-R97
Die entsprechenden Zellen sind nicht gesperrt. Leider springt man nicht von Zelle zu Zelle. Problematik hierbei sicherlich die verbundenen Zellen bzw. manchmal soll Spalte vor Zeile vorgehen beim Zellensprung.
Z.B. bei Zelle AB9 geht es beim Drücken mit TAB nicht weiter mit den Sprung.
Ich hoffe, ihr könnt mir helfen...
VG Markus
Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
25.07.2017 13:22:27
mmat
Hi,
so geht sowas grundsätzlich, leider ist diese Lösung nicht sehr schön.
- Das Makro reagiert auf jeden Wechsel der Auswahl, also auch solche, die von der Enter-Taste oder der Maus ausgelöst werden.
- Leider kann man hier nur das Ziel des Auswahlwechsels feststellen. Ich hätte es lieber an der Quelle aufgehängt.
Daher m. E. für die breite Masse eher ungeeignet (Versuch mal was in B5 zu schreiben :-) ).
' Im Code der Arbeitsmappe
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count  1 Then Exit Sub
' A5 ist ein Eingabefeld, mit der Tab-Taste landet der Cursor in B5
' Das nächste Eingabefeld is E7
If Target.Address = ("$B$5") Then Cells(7, 5).Select: Exit Sub
' ... viele weitere Zeilen dieser Art
End Sub

Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
25.07.2017 13:54:28
Rudi
Hallo,
in ein allg. Modul: 
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Im Klassenmodul der Tabelle: 
Dim rngOld As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim x, strTab As String
Dim vArr, vPos
strTab = "AB3-F9-AB9-G11-J15-J17-AD15-AD17-J22-J24-J26-I40-R40-I47-R47-I50-R50-I53-R53-I62- _
R62-I69-R69-I76-I83-I90-R90-I97-R97-AB3"
vArr = Split(strTab, "-")
If vArr(0)  vArr(UBound(vArr)) Then
'damit der Kreislauf funktioniert
ReDim Preserve vArr(0 To UBound(vArr) + 1)
vArr(UBound(vArr)) = vArr(0)
End If
x = GetAsyncKeyState(&H9)
If CBool(x And &H8000) Then
If Not rngOld Is Nothing Then
vPos = Application.Match(rngOld.Address(0, 0), vArr, 0)
If Not IsError(vPos) Then
Application.EnableEvents = False
Range(vArr(vPos)).Select
Application.EnableEvents = True
End If
End If
End If
Set rngOld = ActiveCell
End Sub
Gruß
Rudi
Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
25.07.2017 14:33:48
Becker
Tausend Dank!!!
AW: Von Zelle zu Zelle springen mittels "TAB"
26.07.2017 14:54:23
Becker
Hallo zusammen,
ich habe das Marko eingefügt. Der Wechsel zur nächsten Zelle erfolgt mit TAB in der richtigen Reihenfolge. Leider habe ich dann beim Testen ein paar Schwierigkeiten die nächste Zelle anzusteuern.
Wenn ich die Zelle beschreibe und dann mit TAB zur nächsten Zelle wechseln will, wird teils zu einer anderen Zelle gesprungen.
Beispiel: Ich beschreibe Zelle AB9 und drücke TAB und er springt zurück zu Zelle F9 anstatt zur Zelle G11 zu springen. Dieses Problem tritt, wie gesagt nur wenn die Zelle beschrieben wird auf. Könnte sicherlich an den verbundenen Zellen liegen oder?
Anbei meine Maske mit dem entsprechenden Marko.
https://www.herber.de/bbs/user/115067.xlsm
Bitte nochmal um Hilfe. Vielen lieben Dank.
MFG Markus
Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
26.07.2017 14:55:32
Becker
Hallo zusammen,
ich habe das Marko eingefügt. Der Wechsel zur nächsten Zelle erfolgt mit TAB in der richtigen Reihenfolge. Leider habe ich dann beim Testen ein paar Schwierigkeiten die nächste Zelle anzusteuern.
Wenn ich die Zelle beschreibe und dann mit TAB zur nächsten Zelle wechseln will, wird teils zu einer anderen Zelle gesprungen.
Beispiel: Ich beschreibe Zelle AB9 und drücke TAB und er springt zurück zu Zelle F9 anstatt zur Zelle G11 zu springen. Dieses Problem tritt, wie gesagt nur wenn die Zelle beschrieben wird auf. Könnte sicherlich an den verbundenen Zellen liegen oder?
Anbei meine Maske mit dem entsprechenden Marko.
https://www.herber.de/bbs/user/115067.xlsm
Bitte nochmal um Hilfe. Vielen lieben Dank.
MFG Markus
Anzeige
AW: Von Zelle zu Zelle springen mittels "TAB"
31.07.2017 09:46:08
Becker
Keiner einen entsprechenden Lösungsvorschlag?
MfG Markus

Forumthreads zu verwandten Themen

Gültigkeitsprüfung in Bezug auf andere Zelle
Erwin

Geschätztes Forum!
Ich möchte in Zelle A1 eine Gültigkeitsprüfung einfügen.
Die Gültigkeit soll mir dort Eingaben bis zur Höchstzahl der in A2 vorhandenen Zahl erlauben.
zB. Wenn in A2 die Zahl 5 steht, soll die Eingabe in A1 bis höchstens bis zur Zahl 5 (also 1,2,3,4,5) erlaubt sei...
14.08.2008 14:06:00
Thread-ID: 1001854
5 Beiträge
unterschiedliche Buchstaben in Textzellen finden
Rob

Liebe xls-Profis,
ich muss Kunden-Stammdaten von 2 Datenbanken vergleichen u habe folgende Aufgabe:
2 Textzellen miteinander vergleichen und Unterschiede finden und markieren.
Einfache Beispiele:
A1 B1
Huber Hubber hier sollte in der Zelle B1 z.B. mit be...
20.08.2008 10:26:10
Thread-ID: 1003114
8 Beiträge
Bei Eintrag in Zelle Eintrag i. anderer Zelle prüf
Josef

Guten Morgen!
Wenn ich z. B. in der Spalte K ein Datum eintrage, soll in der Spalte N in der gleichen Zeile folgendes geprüft werden:
Ist ein Wert in der Spalte N vorhanden dann soll dieser gelöscht und die Zelle rot gefärbt werden.
Wenn ich jedoch ein Datum in der Spalte K lösche,...
26.08.2008 06:17:08
Thread-ID: 1004645
3 Beiträge
Tabellenblattname in Zelle eintragen
obelix-xxl

Hallo,
ich habe mir eine Tabellenblatt als Vorlage erarbeitet und dieser Tabelle auch den Namen Vorlage gegeben.
Mit einem Makro kann ich nun über die zugewiesene Tastenkombination diese Tabelle an das Ende der Arbeitsmappe kopieren. Dabei fragt das Makro nach dem Tabellenblattnamen. Di...
04.09.2008 21:27:29
Thread-ID: 1007526
3 Beiträge
Anzeige
Wenn Wert weniger, in anderer Zelle um d.Wert erh.
Josef

Guten Morgen!
Ich habe z.B. in der Zelle A1 den Wert 5 stehen. Wird dieser Wert z.B. um die Zahl 3 verringert, dann soll der vorhandene Wert in der Zelle B1 um die Zahl 3 erhöht werden. Wie würde hier bitte eine Formellösung dafür lauten?
Danke
Josef
09.09.2008 05:49:00
Thread-ID: 1008272
2 Beiträge
Zelle A2 in Tabelle "Daten" ansprechen
Wolfgang

Hallo,
mit untenstehendem Auszug aus einem Code wird ein Textfeld in einem UF mit Daten aus einem anderen Textfeld des UF "beschickt"; Was müßte ich verändern (kriege das nicht hin), wenn ich nun das ausgeblendete Tabellenblatt "Daten" ansprechen möchte und den Inhalt aus "A2" importieren m...
23.09.2008 09:01:00
Thread-ID: 1011622
4 Beiträge
Anzeige
Zelle in andere Tabelle mit Button kopieren
Benny

Hallo Zusammen!
Kann mir jemand weiterhelfen? Wie kann ich die unten stehende Formel entsprechend anpassen?
Private Sub CommandButton2_Click() Dim wks As Worksheet Set wks = Worksheets("Änderungsanträge") wks.Range("C3") = wks.Range("D3") End Sub
Danke im Voraus!
Benny
07.10.2008 10:06:48
Thread-ID: 1014629
4 Beiträge
Anzeige
Wert bedingt in anderer Zelle darstellen
sascha76er

Hallo,
ich muss leider schon wieder das Forum mit meinen Fragen nerven.
Ich möchte gerne den Wert einer Zelle welcher in der Spalte W steht in einer Zelle in der Spalte D darstellen, aber nur wenn der entsprechende Wert mi WE beginnt.
Geht das?
Gruß
Sascha
08.10.2008 15:16:49
Thread-ID: 1015075
5 Beiträge
Wie Zelle abhängig von anderer Zelle einfärben ?
anderer

Hallo,
ich möchte die Zellen in Spalte B in Abhängigkeit des Wertes in Spalte A hervorheben/einfärben.
Wenn der Wert in Spalte A ungleich dem Wert in Spalte B ist, soll Spalte B fablich hervorgehoben werden.
Wenn z.B. in A5 100 steht und in B5 101, so soll B5 farblich hervorgehoben...
09.10.2008 10:29:05
Thread-ID: 1015270
3 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Zellen von einer in die andere Tabelle kopieren
einer

Guten Morgen!
Ich habe 2 Tabellen. Eine Quelltabelle und eine ZielTabelle. Ich möchte nun die Daten aus der Quelldatei in die Zieldatei einfügen (aber Werte ohn Formatierung einfügen d.h. PasteSpecial). Irgendwie will das nicht gehen. :(
Dim wks As Excel.Worksheet
Dim Quell As Excel...
16.10.2008 10:53:15
Thread-ID: 1016793
5 Beiträge
Anzeige
Tabelle in einer Zelle
Urs

Hallo Excel - Kenner
Eine bescheidene, vielleicht auch dumme Frage:
Kann man eine Tabelle in einer Zelle haben..
So dass ich eigentlich z.B. immer die Zelle A1 offen hätte aber darin meine Tabelle hätte..
Vielen Dank und bis denn
23.10.2008 22:06:04
Thread-ID: 1018815
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Von Zelle zu Zelle springen mit der TAB-Taste in Excel

Schritt-für-Schritt-Anleitung

Um in Excel mit der TAB-Taste von Zelle zu Zelle zu springen, kannst du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne deine Excel-Datei.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge im Projekt-Explorer ein neues Modul hinzu:

    • Rechtsklick auf "VBAProject (dein Dokument)" > Einfügen > Modul.

  4. Kopiere und füge den folgenden Code in das Modul ein:

    Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Dim rngOld As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim x, strTab As String
    Dim vArr, vPos
    strTab = "AB3-F9-AB9-G11-J15-J17-AD15-AD17-J22-J24-J26-I40-R40-I47-R47-I50-R50-I53-R53-I62-R62-I69-R69-I76-I83-I90-R90-I97-R97-AB3"
    vArr = Split(strTab, "-")
    If vArr(0) <> vArr(UBound(vArr)) Then
        ReDim Preserve vArr(0 To UBound(vArr) + 1)
        vArr(UBound(vArr)) = vArr(0)
    End If
    x = GetAsyncKeyState(&H9)
    If CBool(x And &H8000) Then
        If Not rngOld Is Nothing Then
            vPos = Application.Match(rngOld.Address(0, 0), vArr, 0)
            If Not IsError(vPos) Then
                Application.EnableEvents = False
                Range(vArr(vPos)).Select
                Application.EnableEvents = True
            End If
        End If
    End If
    Set rngOld = ActiveCell
End Sub

  5. Schließe den VBA-Editor und kehre zu deiner Excel-Datei zurück.

  6. Teste das Makro, indem du die TAB-Taste drückst, um zu den angegebenen Zellen zu springen.

Häufige Fehler und Lösungen

  • Fehler: Excel springt nicht zur nächsten Zelle.

    • Lösung: Stelle sicher, dass die Zellen, zu denen gesprungen werden soll, nicht gesperrt sind. Überprüfe auch, ob die TAB-Reihenfolge korrekt im VBA-Code definiert ist.

  • Fehler: TAB-Taste funktioniert nicht.

    • Lösung: Überprüfe, ob die TAB-Taste auf deiner Tastatur funktioniert. Teste sie in einem anderen Programm oder in einer anderen Excel-Datei.

  • Fehler: Wenn ich eine Zelle beschreibe und TAB drücke, springt Excel in eine andere Zelle.

    • Lösung: Dies kann an verbundenen Zellen liegen. Überprüfe die Zellverknüpfungen und stelle sicher, dass die Zellen ordnungsgemäß eingerichtet sind.

Alternative Methoden

  1. Blattschutz verwenden: Du kannst den Blattschutz aktivieren und die Zellen, die nicht bearbeitet werden dürfen, sperren. Dadurch wird der Sprung zur nächsten Zelle besser kontrolliert.

  2. Direktes Springen ohne VBA: Du kannst auch die F2-Taste (Bearbeiten) verwenden, um in eine Zelle zu springen, und dann mit Enter oder TAB zur nächsten Zelle zu wechseln.

  3. Formeln nutzen: In bestimmten Fällen kann die Verwendung von Formeln helfen, um Daten in andere Zellen zu ziehen, anstatt manuell zu springen.

Praktische Beispiele

  1. Beispiel 1: Wenn Zelle B1 ausgewählt ist und du die TAB-Taste drückst, soll es zu Zelle D2 weitergehen:

    • Füge die entsprechenden Zellen in die strTab-Variable im VBA-Code ein.

  2. Beispiel 2: Bei einer komplexen Tabelle mit verbundenen Zellen:

    • Achte darauf, dass die Reihenfolge der Sprünge in der strTab-Variable festgelegt wird, um unerwünschte Sprünge zu vermeiden.

Tipps für Profis

  • Verwende benannte Bereiche: Definiere benannte Bereiche für die Zellen, zu denen du springen möchtest. Dies kann die Lesbarkeit deines VBA-Codes verbessern.

  • Fehlerbehandlung einbauen: Füge Fehlerbehandlungen in dein Makro ein, um unerwartete Situationen abzufangen und die Benutzererfahrung zu verbessern.

  • Makros optimieren: Teste und optimiere dein Makro regelmäßig, um sicherzustellen, dass es effizient funktioniert.

FAQ: Häufige Fragen

1. Wie kann ich die TAB-Reihenfolge in Excel festlegen?
Du kannst die TAB-Reihenfolge in Excel festlegen, indem du die Zellen in einer bestimmten Reihenfolge in der strTab-Variable im VBA-Code definierst.

2. Warum springt Excel nicht zur gewünschten Zelle?
Das kann an gesperrten Zellen oder an verbundenen Zellen liegen. Überprüfe die Zellverknüpfungen und den Blattschutz.

3. Funktioniert das Makro in allen Excel-Versionen?
Ja, das Makro sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen. Achte darauf, dass die Makros aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige