Vba: so zählen sie zeilen in der auswahl

Sie können die folgenden Methoden verwenden, um die Anzahl der Zeilen in einer Auswahl mithilfe von VBA zu zählen:

Methode 1: Zählen Sie die Zeilen in der Auswahl und zeigen Sie die Anzahl im Meldungsfeld an

 SubCountRowsInSelection ()

MsgBox Selection.Rows.Count

End Sub

In diesem speziellen Beispiel wird die Anzahl der Zeilen in der aktuellen Auswahl gezählt und diese Zahl dann in einem Meldungsfeld angezeigt.

Methode 2: Zählen Sie die Zeilen in der Auswahl und zeigen Sie die Anzahl in einer bestimmten Zelle an

 SubCountRowsInSelection ()

Range("E1").Value = Selection.Rows.Count

End Sub

In diesem speziellen Beispiel wird die Anzahl der Zeilen in der aktuellen Auswahl gezählt und diese Zahl dann in Zelle E1 angezeigt.

Die folgenden Beispiele zeigen, wie die einzelnen Methoden in der Praxis angewendet werden.

Beispiel 1: Zählen Sie die Zeilen in der Auswahl und zeigen Sie die Anzahl im Meldungsfeld an

Angenommen, wir wählen den Zellbereich A1:C17 in unserer Tabelle aus:

Wir können das folgende Makro erstellen, um die Anzahl der Zeilen in der Auswahl zu zählen und die Ergebnisse in einem Meldungsfeld anzuzeigen:

 SubCountRowsInSelection ()

MsgBox Selection.Rows.Count

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Das Meldungsfeld teilt uns mit, dass die aktuelle Auswahl 17 Zeilen enthält.

Beispiel 2: Zählen Sie die Zeilen in der Auswahl und zeigen Sie die Anzahl in einer bestimmten Zelle an

Angenommen, wir wählen den Zellbereich A4:D9 in unserer Tabelle aus:

Wir können das folgende Makro erstellen, um die Anzahl der Zeilen in der Auswahl zu zählen und die Ergebnisse in Zelle E1 anzuzeigen:

 SubCountRowsInSelection ()

Range("E1").Value = Selection.Rows.Count

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Zelle E1 sagt uns, dass die aktuelle Auswahl 6 Zeilen enthält.

Zusätzliche Ressourcen

Die folgenden Tutorials erklären, wie Sie andere häufige Aufgaben in VBA ausführen:

So zählen Sie Zeilen in einer Tabelle mit VBA
So zählen Sie Zellen mit bestimmtem Text mithilfe von VBA
So zählen Sie mit VBA eindeutige Werte im Bereich