Application.EnableEvents
09.11.2018 13:36:44
niclaus
Ich führe in einer xlsm-Datei folgendes Makro aus, das in einem Modul angelegt ist:
Sub AppEnEv_aus()
Application.EnableEvents = False
End Sub
Nun möchte ich, dass beim Speichern dieser Datei Application.EnableEvents automatisch auf True gesetzt wird. Naheliegend wäre:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.EnableEvents = True
' ODER:
' If Application.EnableEvents = False Then
' Application.EnableEvents = True
' End If
End Sub
Dass das nichts bringt, leuchtet mir ein. Kann mir jemand von Euch sagen, wie ich das bewerkstelligen kann, dass Application.EnableEvents beim Speichern automatisch auf True gesetzt wird? Ist das überhaupt möglich ohne ein zusätzliches "Speichern-Makro", das "Application.EnableEvents = True" enthält?
Vielen Dank Niclaus