使用“审阅”>“检查性能”来提高性能对我来说非常有用,因为我的大部分工作都使用模板工作簿,其中包含各种工作表上的大量宏和数据。
一段时间后,它可能会变得相当慢 - 使用“审查”>“检查性能”可以很好地解决这个问题 - 有没有办法让这种情况在宏内自动发生?
谢谢
我使用宏记录来尝试打开检查性能并得出
Application.CommandBars("Workbook Performance").Visible = False
这不起作用。
命令栏的开关似乎具有不一致的性能,如以下子例程所示。
Option Explicit
' Command bar is "Workbook Performance"
Sub sbWorkbookPerformance()
' Method 'Visible' of object 'CommandBar' failed
Application.CommandBars("Workbook Performance").Visible = True
End Sub
Sub sbWorkbookPerformanceOff()
' works as advertised
Application.CommandBars("Workbook Performance").Visible = False
End Sub
' https://answers.microsoft.com/en-us/msoffice/forum/all/disabling-workbook-query-command-bar-during/88c48f46-00a4-4df4-b1e5-2ed28136b24e
' Command bar is "Queries and Connections"
Sub sbWorkbookQueriesOff()
Application.CommandBars("Workbook Queries").Enabled = False
End Sub
Sub sbWorkbookQueriesOn()
Application.CommandBars("Workbook Queries").Enabled = True
End Sub
Sub sbWorkbookQueriesVisibleTrue()
' Method 'Visible' of object 'CommandBar' failed
Application.CommandBars("Workbook Queries").Visible = True
End Sub
Sub sbWorkbookQueriesVisibleFalse()
Application.CommandBars("Workbook Queries").Visible = False
End Sub
Sub sbUsage()
sbWorkbookQueriesVisibleTrue
MsgBox "Done ..."
End Sub