Ich habe es so versucht:
Dim letzte_Zeile As Integer
For letzte_Zeile = 1 To 1000 Step 1
If Cells(letzte_Zeile, 10) = " " Then Exit For ' Hier kommt der Debugger!
Next
Cells(2, 2).Formula = letzte_Zeile -1
Vielen Dank im Voraus
Gruß Tanja
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