Application.EnableEvents = FALSE not working

Hi all,

I have the following code in my workbook:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.EnableEvents = False
With Worksheets("Forecast Files")

.Activate
.FcstSchool.Value = "School"
.Range("C3").Select
ActiveWindow.ScrollColumn = ActiveCell.Column
ActiveWindow.ScrollRow = ActiveCell.row

End With
With Worksheets("Revenue Forecasts")

.Activate
.Forecast.Value = "Forecast"
.School.Value = "School"
.Range("D3").Select
ActiveWindow.ScrollColumn = ActiveCell.Column
ActiveWindow.ScrollRow = ActiveCell.row

End With
Application.EnableEvents = True
End Sub

During normal use of the workbook, there is a Change event that triggers when FcstSchool is changed, but I do NOT want that to trigger during this save event. I've been using this workbook/code for a couple of years and it's never been an issue, now all of the sudden the Change event is triggering after the highlighted line despite the EnableEvents = False line. Any ideas why this would have changed all of a sudden and how I can get it to work properly again? Thanks!

Attaching a sample workbook enables others to work on your problem:

To attach a sample workbook. Make sure there is just enough data to make it clear what is needed. Include BEFORE/AFTER sheets if needed to show the process you're trying to complete or automate. Remember to desensitize the data.

Click on GO ADVANCED and click "manage attachments" to open the upload window.

To add a file to a post

One solution:
* Declare a variable, say, SaveAndClose, as Boolean (in a standard module)
* In the Workbook_BeforeSave module, set it to TRUE
* In the Worksheet_Change module, test it for TRUE and, if so exit...

Are these ActiveX controls?