Vba: so verbergen sie zeilen basierend auf kriterien
Sie können in VBA die folgende Syntax verwenden, um Zeilen basierend auf einem Zellenwert auszublenden:
SubHideRows ()
Dim i As Integer
For i = 2 To 10
If Cells(i, 1).Value = " Mavs " Then
Cells(i, 1).EntireRow.Hidden = True
Else
Cells(i, 1).EntireRow.Hidden = False
End If
Next i
End Sub
Dieses spezielle Makro verbirgt alle Zeilen im Bereich von 2 bis 10, deren Zellenwert in der ersten Spalte „Mavs“ entspricht.
Sie können auch das folgende Makro verwenden, um alle Zeilen anzuzeigen:
SubUnhideRows ()
Rows.EntireRow.Hidden = False
End Sub
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: Verwenden Sie VBA, um Zeilen basierend auf Kriterien auszublenden
Angenommen, wir haben den folgenden Datensatz mit Informationen über verschiedene Basketballspieler:
Nehmen wir an, wir möchten jede Zeile ausblenden, die „Mavs“ in der Teamspalte enthält.
Dazu können wir das folgende Makro erstellen:
SubHideRows ()
Dim i As Integer
For i = 2 To 10
If Cells(i, 1).Value = " Mavs " Then
Cells(i, 1).EntireRow.Hidden = True
Else
Cells(i, 1).EntireRow.Hidden = False
End If
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Beachten Sie, dass jetzt jede Zeile, die „Mavs“ in der Teamspalte enthält, ausgeblendet wurde.
Wenn wir möchten, können wir das folgende Makro erstellen, um alle Zeilen anzuzeigen:
SubUnhideRows ()
Rows.EntireRow.Hidden = False
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Beachten Sie, dass alle Zeilen erneut angezeigt werden.
Beachten Sie, dass wir in unserem Makro For i = 2 To 10 angegeben haben, um Zeilen zwischen 2 und 10 basierend auf Kriterien auszublenden.
Sie können diese Start- und Endwerte jederzeit ändern, um Zeilen in einem anderen Zeilenbereich auszublenden.
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
VBA: So wenden Sie bedingte Formatierung auf Zellen an
VBA: So zählen Sie die Anzahl der Zeilen im Bereich
VBA: So zählen Sie Zellen mit bestimmtem Text