Sub durch MsgBox beenden
TOYY1
Ich habe einen Button mit dem eine lange Berechnung gestartet wird. Der einzige Button den ich sonst auf der UserForm nicht auf Locked gesetzt haben ist der "Vorgang abbrechen" Button.
Hier die zwei Codes:
Private Sub Berechnung_Click()
Call test_1
End Sub
Private Sub Abbrechen_Click()
MsgBox ("Wollen Sie den Vorgang abbrechen?"), vbYesNo, "Abfrage"
If vbYesNo = True Then
Exit Sub
End If
End Sub
Gruß, Frank