Wie beenden ?
12.05.2020 17:22:53
wolfgang
ich möchte gern eine Datei schließen nur über Button also nicht über
das rote Kreuz oben rechts.
Ich habe mal gegoogelt und das gefunden:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
End Sub
Das Problem, ich habe schon dieses Makro weil ein Makro gestartetwird und der Anwender in eine Tabelle gesetzt wird. Das Funktioniert
allerdings kann ich nicht das Cancel = True unterbringen,
meine Datei bleibt offen.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
Call anwender_ende
Sheets(1).Select
End Sub
grüße wolfgang