Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1756to1760
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wie beenden ?

Wie beenden ?
12.05.2020 17:22:53
wolfgang
Guten Abend,
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 gestartet
wird 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

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wie beenden ?
12.05.2020 17:40:50
Tino
Hallo,
müsste man so lösen können indem nur dieser Button schließen darf.
Im Code den Namen des Button noch anpssen!
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Name des Button zum schließen anpassen
If CStr(Application.Caller) = "ButtonClose" Then
Call anwender_ende
Sheets(1).Select
Else
Cancel = True
End If
End Sub
Gruß Tino
Ich habe ...
12.05.2020 17:46:39
wolfgang
Hallo Tino,
ich habe ein Textfeld als Button.
gruß wolfgang
Erledigt ! Danke -)
12.05.2020 17:51:24
wolfgang
nicht schlimm ...
12.05.2020 17:52:46
Tino
Hallo,
einfach den Namen von dem TextFeld eintragen.

Gruß Tino
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige