VBA
Function LetzteZeile(ws As Worksheet, spalte As String) As Long
LetzteZeile = ws.Cells(ws.Rows.Count, spalte).End(xlUp).Row
End FunctionHinweis: Beispiel: LetzteZeile(Worksheets("Tabelle1"), "A")
VBAExcelZeile
Ermittelt die letzte belegte Zeile einer Spalte zuverlässig.
Function LetzteZeile(ws As Worksheet, spalte As String) As Long
LetzteZeile = ws.Cells(ws.Rows.Count, spalte).End(xlUp).Row
End Function