Letzte beschriebene Zeile in Excel ausgeben

DuWenn kannstdu in Excel die letzte beschriebene Zeile dirbenötigst, ausgebenkannst lassen.du folgenden Code verwenden. Du musst dort nur das Tabellenblatt ändern. Wahlweise kannst diesendu Wertauch danneine in einerLong 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.