Hallo Leute,
hab ein Problem in VBA Excel, sieht wie folgt aus:
Wenn ich auf den Button klicke werden diese Sub´s ausgeführt:
CreateFile (strPart)
FilterFile (strPart)
DelTab
DelZeile
DelCode
Jetzt will ich in CreateFile eine if abfrage einbauen, die wenn man bei "Speichern unter" auf abbrechen klickt, die gesamte Subroutine beendet!
Habs mit "Exit Sub" versucht, jedocht beendet es dann nur den Sub CreateFile und läft dann weiter zu Filterfile.
bolError = Application.Dialogs(xlDialogSaveAs).Show(strNewName)
strNewName = Application.ActiveWorkbook.Name
If bolError = False Then
Exit Sub
Er ignoriert das Exit Sub für die restlichen Sub´s.
Wie kann ich einen endgültigen EXIT machen?
Wäre sehr dankbar.
Gruß |