可以通过使用VBA代码来比较Application.CalculateFull和AltGr+Shift+F9的运行速度,并确定哪种方法更快。
示例代码如下:
Sub CalculateFullTest() Dim StartTime As Double Dim EndTime As Double Dim CalcTimeA As Double Dim CalcTimeB As Double
'计算Application.CalculateFull的时间
StartTime = Timer
Application.CalculateFull
EndTime = Timer
CalcTimeA = EndTime - StartTime
'计算AltGr+Shift+F9的时间
StartTime = Timer
ActiveSheet.Calculate
EndTime = Timer
CalcTimeB = EndTime - StartTime
'比较运行时间
If CalcTimeA < CalcTimeB Then
MsgBox "Application.CalculateFull比AltGr+Shift+F9更快"
ElseIf CalcTimeA > CalcTimeB Then
MsgBox "AltGr+Shift+F9比Application.CalculateFull更快"
Else
MsgBox "Application.CalculateFull和AltGr+Shift+F9的速度相同"
End If
End Sub
请在打开的Excel文件中依次执行以下操作:
此时,将会弹出一个消息框,显示Application.CalculateFull和AltGr+Shift+F9的速度哪个更快。根据实际情况,选择使用更快的计算方式即可。
上一篇:Application.Calculate方法不起作用。
下一篇:Application.CalculateUntilAsyncQueriesDone代码阻止了Excel中SQL查询的登录框。