对于在 Microsoft Excel 中执行的任何计算，返回指示应用程序计算状态的 XlCalculationState 常量。 此为只读属性。
语法
表达式。CalculationState
expression：表示 Application 对象的变量。
示例
在本示例中，Microsoft Excel 检查是否存在正在执行的计算。 如果未执行任何计算，则一条消息将计算状态显示为“完成”。 否则，一条消息将计算状态显示为“未完成”。
Sub StillCalculating()
If Application.CalculationState = xlDone Then
MsgBox "Done"
Else
MsgBox "Not Done"
End If
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。