Hallo,
ich bekomme immer folgende meldung:
Ausführung des Codes wurde unterbrochen
ich kann fortfahren beenden debuggen anklicken. wenn ich auf fortfahren gehe, läuft das program eine schleife weiter und stopt dann wieder.
Hat jem ne Idee?
Viele Grüße aus Hamburg SonneWolkenMix, aber Sonne gewinnt, Temperatur sehr angenehm.
Ray
mein codeAuszug
x = 70
Dim i1
For i1 = 1 To 10

x = x + 1

If Worksheets("" & mL).Cells(x, 1).Value = "" Then GoTo zweiter1
If Not (Worksheets("" & mL).Cells(x, 16).Value And (Worksheets("" & mL).Cells(x, 17).Value = "" _
Or Worksheets("" & mL).Cells(x, 17).Value >= ZtRb)) Then GoTo zwwX Else

Sheets("anschreiben").Select
Range("n15").Value = "5 " & x
Sheets("anschreiben").PrintOut from:=1, To:=1, Copies:=1, Collate:=True
Sheets("mitgliederliste").Select
zwwX:
Next i1