wollte mal fragen ob mir jemand den Befehl geben kann, der in einer Excel-Tabelle die Anzahl der Zeilen ermittelt und das diese Anzahl in einer MsgBox ausgegeben wird, wäre euch Dankbar wenn Ihr mir hier helfen könntet.
SteeL
For Each A In Range("C2:C" & AnzahlZeilen)
und sei Dir bewusst, das der CodeAnzahlZeilen = Range("A2").End(xlDown).Row
nicht richtig funktioniert, wenn sich Leerzellen in der Tabelle befinden.AnzahlZeilen = Range("A65535").End(xlUp).Row
Gruß Matthias
Sub Anzahl_Zeilen
Dim z as Long
z = Worksheets("Tabelle1").UsedRange.Rows.Count
MsgBox "Anzahl der Zeilen: " & z
End Sub