促使对所有打开工作簿中的数据进行完整计算。
expression.CalculateFull
expression 必需。该表达式返回“应用于”列表中的对象之一。
本示例将当前 Microsoft Excel 的版本与上次计算该工作簿的 Excel 版本进行比较。如果两个版本不同,则对所有打开工作簿中的数据进行一次完整计算。
If Application.CalculationVersion <> _
Workbooks(1).CalculationVersion Then
Application.CalculateFull
End If