就是EXCEL运行半小时后速度就开始变慢，但关闭重开后就会变快，就想定时清理一下，不用关闭又打开那么麻烦，只剩10分了，前几天把分用完了，还请帮忙
Private Sub workbook_open() '打开该表格则运行
Dim t#
t = Timer
Do While Format(Timer - s, "0") Mod 1800 = 0 '1800秒即半个钟
Application.CutCopyMode = False
Loop
End Sub追问
Dim t#
t = Timer
Do While Format(Timer - s, "0") Mod 1800 = 0 '1800秒即半个钟
Application.CutCopyMode = False
Loop
End Sub追问
按Alt+F11打开VBA编辑界面在左侧窗口中双击对应的表格然后将代码复制进去并关闭VBA编辑界面，是这样用吗？
温馨提示：答案为网友推荐，仅供参考
