Programm Unterbrechung
18.02.2004 12:42:43
Alex K.
folgendes: über einen Button stosse ich eine Prozedur an. Da diese sehr lang gehen könnte, möchte ich die Möglichkeit haben, diese Prozedur zu unterbrechen.
Gibt es dafür einen Befehl oder ähnliches, also ist es möglich?
Über den ErrorHandler, mit xlEnableCancelKey geht es nicht und auch nicht die Zuweisung einer Taste zu einer "Unterbrechungs"-Prodedur.
Das Problem an der ganze Sache ist zusätzlich, das ich in verschiedenen Datein hin und her springe.
Danke und Gruß
Anja
Betrifft: AW: Programmdurchlauf unterbrechen
Hallo Anja,
hier mein Vorschlag. Das Makro "EndlosSchleife" stellt die Verarbeitung dar. Dies wäre also dein eigentliches Makro. Das Makro "Break" wird auf die Schaltfläche zum Unterbrechen aufgerufen und bewirkt einen Abbruch der Schleife.
Public
Sub IsCancel As Boolean
Public
Sub EndlosSchleife()
Do While IsCancel = False
DoEvents
Loop
MsgBox "Break"
IsCancel = False
End Sub
Public
Sub Break()
IsCancel = True
End Sub