check if excel sheet in manual calc mode

[Dan]

Is it possible to check all the time if a sheet has by mistake been switched
to manual calc?

I have tried the below but obviously not working as when we are in Manual
calc no calc is done to triger the volatility of the function.

Function MyCalcStatus()
Application.Volatile
If Application.Calculation = -4105 Then MyCalcStatus = "Auto"
If Application.Calculation = -4135 Then MyCalcStatus = "Manual"
End Function


Many thanks,
Dan

 

[ilia]

Could use either change or selection_change worksheet events. Also,
you can use these two constants, for better readability:

Application.Calculation = Excel.xlCalculationAutomatic
Application.Calculation = Excel.xlCalculationManual