2017-09-08 2 views
0

Ich habe ein Problem, einen VBA-Skript ausgeführt unter Verwendung von Before in Excel.
Ich verwende dieses Skript, aber ich kann die Datei ohne Probleme oder Msgbox speichern.Before funktionieren nicht gut in Excel-Makro

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 
a = MsgBox("Do you really want to save the workbook?", vbYesNo) 
If a = vbNo Then Cancel = True 
End Sub 

Was ist das Problem? Es sollte eine Msgbox zeigen, wo ich abbrechen kann, um zu speichern.

+0

Sind Ereignisse aktiviert? – CLR

+0

Ich habe keinen Code, um Ereignisse zu verhindern. –

+0

Ich habe Excel neu gestartet und jetzt funktioniert es. :) –

Antwort

0

Überprüfen Sie Ihre Trust Center-Einstellungen auf Datei> Optionen> Vertrauensstellungscenter> Trust Center Einstellungen> Makro-Einstellungen. Überprüfen Sie das Optionsfeld neben „alle ermöglichen“ und sehen, was

geschieht und auch müssen die Dateien haben die Endung von xlsb oder xlsm

+0

Es war bereits auf "alle aktivieren" eingestellt. Die Erweiterung ist XLSM. –

+0

gut, es funktioniert für mich. Es scheint kein Problem mit dem Code zu geben. da sollte noch etwas anderes sein. Sie können auch durch das Schreiben „? Application.EnableEvents“ in unmittelbaren Fenstern – ExcelinEfendisi

0

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) innerhalb ThisWorkbook in einem VBA-Projekt sein muss.

enter image description here

+0

den Ereignisstatus überprüfen Ja, es innen Thisworkbook –

+0

Maby dies helfen: [Stack-Überlauf] (https://stackoverflow.com/questions/26296597/how-to -enable-events-so-workbook-beforesave-ruft-ruft – Dominik

+0

Nein, es hat nicht geholfen. Ich habe alle Dinge in der Post versucht, aber ich kann das Dokument immer noch ohne eine MsgBox speichern –

Verwandte Themen