hello
i am trying to let excel tell me what calculation mode is currentlly active.
please correct the following:
[VBA]
Sub caculatem()
Dim x As String
Dim ireply As VbMsgBoxResult
If Application.Calculation = xlCalculationAutomatic Then Exit Sub
MsgBox "calculation currentlly is manual,change to automatic?", vbYesNo + vbCritical, "calculation state"
If ireply = vbYes Then
Application.Calculation = xlCalculationAutomatic
End If
End Sub

[/VBA]
thanks