wenn ich nicht alle Zeilen haben will, sondern nur bis 5.
lZeile = lZeile + 1
wie sieht dann der Befehl aus?
Danke
Sub t()
Dim lZeile As Long
Do Until lZeile = 5
lZeile = lZeile + 1
Debug.Print lZeile
Loop
End Sub
cuFor lZeile = 1 To 5
MsgBox lZeile
Next
Gruß Gerd