My current solution: If
VB wants to save, calls a procedure that
includes:
Sub FileSave(TargetWorkbook as Workbook)
If Not WorkbookBeforeSave(TargetWorkbook ) Then
Application.EnableEvents = False
TargetWorkbook .Save
Application.EnableEvents = True
End If