Hallo,
vielen Dank für deine Antwort, da hast du natürlich völlig recht, da wäre ich selber nie mehr drauf gekommen.
Ich habe jetzt ein bisschen rumprobiert, und das scheint nicht das einzige Problem zu sein.
(Wenn ich z.B. alle „Blattänderungs-Abfragen“ auskommentiere und damit die Endlosschleife beseitigt sein müsste, bekomme ich denselben Fehler)
Da diese Liste mittlerweile ein richtiges Makro-Ungetüm ist und ich auch nicht genau weiß, wo ich noch nach Fehlern suchen soll, habe ich jetzt folgende (Kompromiss-) Lösung genommen:
Im Modul:
Application.EnableEvents = False
If Workbooks.Count = 1 Then
If ThisWorkbook.Saved = False Then
ThisWorkbook.Save
End If
Application.Quit
Else
ThisWorkbook.Close True
End If
End If
Else
End If
Application.EnableEvents = True
Habe natürlich auch versucht das Enable Events in die BeforeSafe Prozedur einzubauen, weil das meiner Meinung nach genau das gewesen wäre was ich gebraucht hätte, hat aber auch den Fehler erzeugt.
Und so klappt es jetzt und mit der kleinen Einschränkung, dass das Datum/Zeit nicht aktualisiert wird, falls die Liste automatisch geschlossen wird, kann ich leben.
Grüße
|