ich verstehe mal wieder die Welt nicht. Warum gibt mir die Befehlszeile nicht die erste leere Zeile zurück?
Sub test()
intRow = Cells(Rows.Count, 1).End(xlUp).Row + 1
End Sub
Gruß Manfred
Sub test()
intRow = Cells(Rows.Count, 1).End(xlUp).Row + 1
End Sub
Sub zeile()
MsgBox UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen