Sprunganweisung in Excel: Zum nächsten sichtbaren Feld mit Makros
Schritt-für-Schritt-Anleitung
Um in einer gefilterten Excel-Tabelle mit einem Makro zur nächsten sichtbaren Zelle zu springen, kannst Du folgenden VBA-Code verwenden:
Sub NaechsteSichtbareZeileSelectieren()
Dim Zeile As Long
Zeile = ActiveCell.Row
With ActiveSheet
Do
Zeile = Zeile + 1
Loop Until Rows(Zeile).Hidden = False
Cells(Zeile, 1).Select
End With
End Sub
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Klicke auf
Einfügen > Modul, um ein neues Modul zu erstellen.
- Kopiere den obigen Code in das Modul.
- Schließe den VBA-Editor und kehre zu Deinem Excel-Dokument zurück.
- Setze den Cursor in die Zelle, von der aus Du springen möchtest.
- Führe das Makro aus, indem Du
ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.
Häufige Fehler und Lösungen
Alternative Methoden
Eine andere Möglichkeit, zur nächsten sichtbaren Zelle zu springen, besteht darin, den folgenden alternativen Code zu verwenden:
Public iRow As Long
Public counter As Long
Sub NaechsteAutoFilterZeile()
Dim iRowT As Long
counter = counter + 1
If counter > 1 Then
iRow = iRow + 1
Else
iRow = 2
End If
Do Until IsEmpty(Cells(iRow, 1))
If Rows(iRow).Hidden = False Then
iRowT = iRow
Exit Do
End If
iRow = iRow + 1
Loop
If iRowT = 0 Then
iRow = 0
counter = 0
Exit Sub
Else
Cells(iRowT, 1).Select
End If
End Sub
Diese Methode ermöglicht es Dir, zwischen sichtbaren Zellen in einer gefilterten Tabelle zu navigieren, was besonders nützlich ist, wenn Du mehrere Filter anwendest.
Praktische Beispiele
-
Anwendung des Makros: Stelle Dir vor, Du hast eine Liste von Verkaufsdaten gefiltert nach Region. Wenn Du den Cursor auf den ersten sichtbaren Datensatz setzt und das Makro ausführst, springt es zur nächsten sichtbaren Zelle, die die Verkaufszahlen für die nächste Region anzeigt.
-
Benutzung in Formularen: Du kannst dieses Makro auch in Formularen verwenden, um die Benutzerführung zu verbessern, indem Du sicherstellst, dass sie immer zu den relevanten Daten springen.
Tipps für Profis
- Fehlerbehebung: Wenn das Makro nicht wie erwartet funktioniert, teste es schrittweise, indem Du den Code in der VBA-Umgebung debuggen lässt.
- Makros speichern: Denke daran, Deine Excel-Datei im .xlsm-Format zu speichern, um sicherzustellen, dass die Makros erhalten bleiben.
- Verwendung von Shortcuts: Du kannst auch eigene Tastenkombinationen für Deine Makros definieren, um den Zugriff zu erleichtern.
FAQ: Häufige Fragen
1. Wo kann ich den VBA-Editor in Excel finden?
Um den VBA-Editor zu öffnen, drücke ALT + F11.
2. Kann ich die Codes anpassen?
Ja, Du kannst die Codes anpassen, um weitere Funktionen hinzuzufügen oder die Logik zu ändern, je nach Deinen spezifischen Anforderungen.
3. Funktioniert das Makro in allen Excel-Versionen?
Das Beispiel funktioniert in Excel-Versionen, die VBA unterstützen, wie Excel 2010, 2013, 2016, 2019 und Microsoft 365.