Application.Calculation = xlCalculationAutomatic
As Conan mentioned, xlCalculationAutomatic and xlCalculationManual are
predefined constants for the numbers -4105 and -4135. By the way, there is a
3rd possible mode... 2 whose predefined constant is
xlCalculationSemiAutomatic. While somewhat ugly, you can use this statement
to print out what I think you want...
Debug.Print "Starting NuTenant: " & _
Choose(((Application.Calculation + 4165) Mod 4077) / 30, _
"xlCalculationManual", "xlCalculationAutomatic", _
"xlCalculationSemiAutomatic")
It handles all three modes; however, if you never use
xlCalculationSemiAutomatic, then you can use this somewhat shorter statement
instead...
Debug.Print "Starting NuTenant: " & _
Choose((Application.Calculation + 4165) / 30, _
"xlCalculationManual", "xlCalculationAutomatic")
Rick
"Karen53" wrote in message
...
Hi,
How do I check the status of xlCalculation (Manual or Automatic) in a
debug
statement?
I tried
Debug.Print "Starting NuTenant " & Application.Calculation
I'm getting results like -4105 and -4135
--
Thanks for your help.
Karen53
|