Sie wollen in #Excel mit #VBA die #letzteZeile oder die #letzteSpalte finden? Da haben Sie viele Möglichkeiten – ich stelle heute die zweite vor, es wird jeweils die Zeilennummer bzw. die Spaltennummer (also nicht der Buchstabe) geliefert. mySheet ist eine Objektvariable, die auf das auszuwertende Blatt verweist (z.B. per
Set mySheet = ThisWorkbook.Worksheets("Tabelle1")
oder
Set mySheet = ActiveSheet
schon irgendwo früher im Code. Wir gehen davon aus, dass das passt :-).
LastRowNo = mySheet.UsedRange.Rows(mySheet.UsedRange.Rows.Count).Row
LastColNo = mySheet.UsedRange.Columns(mySheet.UsedRange.Columns.Count).Column
Hier benutzen wir das UsedRange-Objekt, um die letzte Zeile des benutzen Bereichs zu finden. Das Ergebnis kann von dem der gestern benutzten Methode durchaus abweichen. Hier bekommen wir die Zeilen- bzw. Spaltennummer der untersten bzw. am weitesten rechts gelegenen Zelle zurück, die auch nur irgendwie benutzt worden ist.
Ganz genau gesprochen: wir zählen zunächst die benutzten Zeilen (mySheet.UsedRange.Rows.Count), dann erfragen wir die Nummer der sovielten Zeile aus dem tatsächlichen UsedRange (der ja nicht zwangsläufig in Zeile 1 beginnt).
katharinakanns
Soprani Software 