Ereignis Workbook_BeforeClose

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Ereignis Workbook_BeforeClose
von: Marc
Geschrieben am: 31.10.2003 10:04:10

Hallo Profis,

ich glaube ich habe ne Blockade, denn so schwer kann das doch nicht sein.

Ich möchte gerne, dass vor dem Schliessen einer Mappe abgefragt wird, ob an alles gedacht wurde.

Dazu dieser Code im Modul Diese Arbeitsmappe:


Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim check As Boolean
check = MsgBox("Haben Sie an alles gedacht ?", vbYesNo)
If check = vbNo Then Cancel = True
If check = vbYes Then Cancel = False
End Sub


D.h. wenn Nein angeklickt wird, soll die Mappe nicht geschlossen werden.

Was mache ich falsch ?

Grüsse,
Marc
Bild


Betrifft: AW: Ereignis Workbook_BeforeClose
von: Dirk
Geschrieben am: 31.10.2003 10:08:11

Hallo.

Du hast "check" als boolisch deklariert. Keine Deiner If-Bedingungen trifft daher zu.

Cheers


Bild


Betrifft: Danke !!
von: Marc
Geschrieben am: 31.10.2003 10:14:27

Danke Dirk,

hab ich's mir doch gedacht, dass ich mega auf'm Schlauch stehe.
Werde mir wohl noch nen Kaffee genehmigen müssen...

Grüsse,
Marc


Bild


Betrifft: *g* No prob o.T.
von: Dirk
Geschrieben am: 31.10.2003 10:15:41




 Bild

Beiträge aus den Excel-Beispielen zum Thema " Ereignis Workbook_BeforeClose"