Letzte beschriebene Zeile in Excel ausgeben

Wenn du in Excel die letzte beschriebene Zeile benötigst, kannst du folgenden Code verwenden. Du musst dort nur das Tabellenblatt ändern. Wahlweise kannst du auch eine Long Variable erstellen um größere Zahlenbereiche zu speichern.

Dim i As Integer
i = Worksheets(TabellenBlatt).Cells(Rows.Count, 1).End(xlUp).Row

Dim l As Long
l = Worksheets(TabellenBlatt).Cells(Rows.Count, 1).End(xlUp).Row

---

Erklärung

Excel greift zuerst das Worksheet ab, dort verwendet er die Zellenposition der letzten Zeile in Spalte 1. Mit dem xlUp zählt er alle Zeilen nach oben und gibt die Zahl dann aus.