CalculationAutomatic is changing to manual

[elrussell]

I have the following code in ThisWorkbook:



Private Sub Workbook_Open()
Application.Calculation = xlCalculationAutomatic
End Sub



Sure enough, when I examine them, every worksheet is set to automatic
calculation (Tools | Options | Calculation )

But after a few minutes of usage, the worksheet(s) revert back to
'manual' calculation mode.

Does this have anything to do with the way the application was
originally saved? Is there a global fix? Should I be looking for some
errant code or event that is flipping the calculation from 'automatic'
to 'manual'?

Thanks in advance....

 

[Guest]

As a guess you have some event driven code that change the setting on you.
Open the project in the VBE and select find (Ctrl+F). The dialog will ask
where you want to search. Select entire Project. Type xlManual into the text
box and execute the search. You will probably find something other than the
little bit of code you have already posted.