VBA Finden Sie die letzte Spalte in einer Zeile mit Daten

Select All
last_col = Cells(1, Columns.Count).End(xlToLeft).Column
Successful Starling