Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

msgbox

Forumthread: msgbox

msgbox
24.04.2003 17:35:25
thomas
liebes forum!

folgender code:

Mldg = MsgBox("Wollen Sie trotzdem speichern?", vbYesNo)

If Mldg = vbYes Then Workbook.Save
If Mldg = vbNo Then Exit Sub

Wie kann ich ausschalten, daß trotz workbook.save und exit sub das fenster mit "sollen ihre änderungen gespeichert werden" ausgeblendet wird. warum wir trotz workbook.save diese meldung angezeigt?

lg
thomas

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: msgbox
24.04.2003 17:39:47
moe

das sollte dein Problem Lösen
Gruss
moe
application.displayalerts = false
Mldg = MsgBox("Wollen Sie trotzdem speichern?", vbYesNo)

If Mldg = vbYes Then Workbook.Save
If Mldg = vbNo Then Exit Sub
application.displayalerts = true


Re: msgbox
24.04.2003 17:57:25
Bertram

Hello again,

Ist Mldg = vbNo, wird das Ereignis zwar beendet, aber nicht die Routine von Excel, also, wie vorher erwähnt:
ActiveWorkbook.Saved = True einbauen

Gruß
Bertram

Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18