Hi
Ich habe mehrer FOR ... Next Formeln zusammen:
For xx = 1 To 15
For cc = 1 To 80
If Sheets("Mitarbeiter").Cells(cc, 2) Sheets("Mitarbeiter").Cells(xx, 100) Then GoTo falsch
For aa = 3 To 45 Step 3
If Sheets("Mitarbeiter").Cells(cc, aa) = ComboBox1 Then Sheets("Mitarbeiter").Cells(cc, aa + 1) = Sheets("Mitarbeiter").Cells(xx, 101): aa = 45
Next aa
cc = 80
falsch:
Next cc
Next xx
Wie kann ich ohne den einen GoTo Befehl auskommen?
Wenn ich ein End If vor Next cc mache kommt eine Fehlermeldung.
MfG
KaJu