Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1688to1692
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1688to1692
1688to1692
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ThisWorkbook ohne Rückfrage schließen

ThisWorkbook ohne Rückfrage schließen
02.05.2019 10:53:08
Sven
Hallo zusammen,
folgende Kleinigkeit: Wird bei diesem Code die letzte Zeile eigentlich noch ausgeführt? 
Application.DisplayAlerts = False
ThisWorkbook.Close
Application.DisplayAlerts = True
Die Intention ist ja klar. Die Mappe soll sich ohne Rückfrage selber schließen. Danach sollen aber die Alerts wieder angezeigt werden, da Excel an sich ja auf bleibt.
Grüße
Sven

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ThisWorkbook ohne Rückfrage schließen
02.05.2019 10:54:35
Werner
Hallo Sven,
am Ende werden die Display-Alerts automatisch wieder auf True gesetzt.
Lass die letzte Codezeile doch einfach mal weg und probiers aus.
Gruß Werner
AW: ThisWorkbook ohne Rückfrage schließen
02.05.2019 11:19:10
Torsten
Hallo,
du kannst aber auch die Rueckfrage nach speichern oder nicht speichern umgehen mit: 

ThisWorkbook.Close savechanges:=True       'fuer speichern ja
ThisWorkbook.Close savechanges:=False      'fuer speichern nein

anstatt die DisplayAlerts aus und an zu schalten.
Gruss Torsten
AW: ThisWorkbook ohne Rückfrage schließen
02.05.2019 11:18:45
Daniel
Hi
wie Werner schon schrieb, die letzte Zeile brauchst du nicht, da Application.DisplayAlerts bei Makroende automatisch wieder aktiviert wird, ähnlich wie ScreenUpdating.
(für beide Einstellungen ist FALSE nur bei laufendem Makro sinnvoll)
Im Prinzip brauchst du das aber nicht, du kannst bei .Close auch als Parameter mit angeben, ob die Datei gespeichert oder ohne speichern geschlossen werden soll.
Dann ist eine Rückfrage des Systems nicht erforderlich und du brauchst beim DisplayAlerts nichts ändern:
ThisWorkbook.Close False '--- ohne Speichern schließen
ThisWorkbook.Close True '--- vor dem Schließen speichern.
Gruß Daniel
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige