Ich ermittele im Sub für die variable 'ende' die letzte zelle der aktuellen zeile mit einem eintrag.
Ich möchte jedoch eigentlich die vorletzte auswählen.
Wie ist dies am einfachsten möglich ?
Danke !
Sub BWA()
Sheets("Daten").Activate
Do
Set Start = Range("A:A").Find(1000000)
Set ende = Start.End(xlToRight)
Range(Start, ende).Copy
Exit Do
Loop
End Sub