Toggle Autocalculate On/Off

[Billy]

Using XL 2002 for Windows, I sometimes work with several files that
need to manually calculate, while also using files I want to
automatically calculate. Is there a macro i can use to toggle
auotcalculate on/off as I need it. It is troublesome having to go to
"Options" every time.

Thanks
Billy

 

[Bob Umlas]

Assign a key combo to:
Sub ToggleCalc()
With Application
If .Calculation = xlCalculationAutomatic Then
.Calculation = xlCalcalucationManual
Else
.Calculation = xlCalculationAutomatic
End If
End With
End Sub
(Untested)