Office: VBA-Prozedur beim schließen ausführen

Hallo,

ich möchte eine VBA-Prozedur beim Schließen von der Exceldatei ausführen.
Vieleicht hat einer von euch das schon mal gemacht, oder Ihr wißt einfach wie man das macht.

Im voraus BESTEN DANK

Gruß Rene

:)

 

Moin, René,

bei Excel gibt es dafür das Ereignis Sub Workbook_BeforeClose(Cancel As Boolean), das sich in DieserArbeitsmappe befinden muss (wurde IMHO mit Excel97 eingeführt). Weiterhin wird immer noch ein Makro namens Sub Auto_Close unterstützt - dieses kann sich in einem allgemeinen Modul befinden.

Anmerkung: Bei Sub Workbook_BeforeClose(Cancel As Boolean) solltest Du darauf achten, dass die Aktion eventuell vom Nutzer abgebrochen werden kann (z.B. die "Wollen Sie speichern?"-Frage, wenn eine Zelle verändert wurde oder sich eine Datums-/Zeitzelle in der Mappe befindet). Hier sollte dann besonderes Augenmerk auf die Reihenfolge und eine entsprechende Behandlung der Ereignisse gelegt werden.

Ein (zugegeben ziemlich langes) Beispiel mit Downloadmöglichkeit kannst Du in Zur Sicherung von Mappen finden.

 

Auch Guten Morgen,

gemacht getan aber nix geht!
Ich habe die Funktion unter Module stehen. Wie soll ich die dem Workbook zuordnen?

Hier der Code:

Private Sub App_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
a = MsgBox("Möchten Sie ein Update ausführen lassen?", vbYesNo)

If a = vbNo Then Cancel = True
End Sub

Gruss Rene

 

So jetzt klappt es auch damit!!!!

Fürs Archiv!

Also folgenden Code zum Testen habe ich nun eingefügt:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox ("Es funktioniert")
End Sub

Schreiben muss man den Code in "Diese Arbeitsmappe"

Hin kommt man unter
Extras - Markro - Visual Basic - Editor

Einfach Code einfügen und fertig!

Danke für den Befehl

Gruss
Rene

*grinangel

 

Moin, René,

versteh es bitte als Tipp: wenn Du im VBEditor bist und DieseArbeitsmappe aufgerufen hast, ist im linken oberen Teil ein Kombinationsfenster, das anfänglich auf Allgemein steht. Hier kann man Workbook auswählen, dann werden im nebenstehenden Fenster alle dafür vorhandenen Befehle gelistet.

Und zu meiner Verteidigung: ich habe den Code aus dem Editor kopiert und nichts von einer Application geschrieben - ich wußte nicht, dass dies aus einer anderen Anwendung gestartet werden sollte.