Das Makro soll so oft widerhohlt werden bis in der Zelle Z1 ein bestimmter Wert erreicht wird.
Sub NeueKombi()
l = Worksheets("Daten").[h1]
If test = True Then
If l = 3 Then
Topp
End If
End If
If test = False Then
If l = 0 Then
Topp
End If
End If
If test = False Then
If l = 2 Then
Flopp
End If
End If
End Sub
also wenn du ne schlaue antwort willst musst du schon n bisschen mehr erklären.
Aber wenn ich's richtig verstanden hab muss du nur vorne ein do reinsetzten und hinten ein loop. da wo's dann rausspringen soll schreibst du exit do.