Calculation Mode

  • Thread starter Thread starter Kevin H. Stecyk
  • Start date Start date
K

Kevin H. Stecyk

Calculation Mode.

I want to determine the user's calculation mode. Then change it to manual.
Once the subroutine is complete, I then want to set the calculation mode
back to original setting. How do I do that?

Regards,
Kevin
 
Hi Kevin

Sub Tester()
Dim CalcMode As Long

With Application
CalcMode = .Calculation
.Calculation = xlCalculationManual
End With

',,,,,,,,,,,,,,Your Code

With Application
.Calculation = CalcMode
End With

End Sub
 
Norman Jones...
Hi Kevin

Sub Tester()
Dim CalcMode As Long

With Application
CalcMode = .Calculation
.Calculation = xlCalculationManual
End With

',,,,,,,,,,,,,,Your Code

With Application
.Calculation = CalcMode
End With

End Sub
Click to expand...

Norman,

That is exactly what I would looking for. Thank you very much.

Best regards,
Kevin
 
Back
Top