Bei MsgBox Code abbrechen
10.12.2012 18:31:00
Heinz
Habe ein Problem.
Wenn eine der beiden unteren MsgBoxen erscheint sollte der Code sofort abgebrochen werden.
Wenn die Arbeitsmappe Vorlage Sortierer.xlsm oder Schichtvorlagen Sortierer.xlsm
nicht geöffnet sind,erscheint die MsgBox.
Könnte mir bitte jemand weiterhelfen?
Gruß Heinz
Application.CutCopyMode = False
Else
MsgBox "Vorlage Sortierer öffen. Nochmals versuchen"
End If
Else
MsgBox "Zuerst Schichtvorlagen Sortierer.xlsm öffnen."
End If
MsgBox "Neuer Schichtplan wurde erstellt."
Workbooks("Schichtvorlagen Sortierer.xlsm").Close SaveChanges:=True
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub