ich benötige mal Eure Hilfe. Ich möchte über den Button Excel komplett beenden, aber auch nur diese. Wenn eine weitere Excel Datei offen ist soll diese vom schließen nicht angesprochen werden.
Ich habe soweit auch einen Code aber wenn da bei der Abfrage "nein" gewählt wird, soll der Vorgang abgebrochen werden und Excel nicht geschlossen werden. Mir fehlt da noch ein Teil und da benötige ich mal bitte Eure Hilfe.
Gruß Christian
Option Explicit
Private Sub CommandButton5_Click()
If ActiveWorkbook.Saved = MsgBox("Programm ohne Speichern beenden?", vbQuestion Or vbYesNo, " _
Abfrage") = vbYes Then
End If
If Workbooks.Count > 1 Then
ThisWorkbook.Close
Else
End If
End Sub