Ereignis Workbook_BeforeClose

• Ereignis Workbook_BeforeClose von Marc vom 31.10.2003 10:04:10
  • AW: Ereignis Workbook_BeforeClose - von Dirk am 31.10.2003 10:08:11
    • Danke !! - von Marc am 31.10.2003 10:14:27
      • *g* No prob o.T. - von Dirk am 31.10.2003 10:15:41

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

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

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

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

Excel-Beispiele zum Thema " Ereignis Workbook_BeforeClose"
Die Ereignisse Zellauswahl, Eingabe und Doppelklick	SVERWEIS als Ereignisprozedur
Im Change-Ereignis Eingabe in oder Leeren von Zellen erkennen	Makroverzweigung im Change-Ereignis
ComboBox mit Ereigniscode in Tabellenblatt erstellen	DoubleClick-Ereignis für alle Arbeitsmappen initialisieren
Begrenzung der Textlänge über Ereignis-Programmierung	Beispiele zum Einsatz des SelectionChange-Ereignisses