VBA字典查询exists方法突然变慢

Excel中VBA字典查询exists方法突然变慢，之前就遇到过一次，不过第二天啥也没动就好了，现在又出现了
测试代码如下：

Sub 查询测试()
Dim df, T, i&
Set df = CreateObject("scripting.dictionary")
df(1) = 1
T = Timer
For i = 1 To 10
df.exists (1)
Next i
MsgBox "测试完成!用时" & Timer - T & "秒"
End Sub

最简单的10次查询竟然要1.5秒，正常情况下即使循环1000次都不需要1毫秒的。
很多基于字典写的宏都没法用了
求解决

换一台电脑试试，可能是电脑问题，也有可能excel的数据太多，导致占用太多内存，可以从这两方面测试一下

请问解决了吗，我这边也有这个问题

一般不可能这么慢，可能是其他原因。
以下是执行截图：

挺神奇的，我测试了一下100万用时0.55秒