作者：绿色风
分类：
时间：2022-08-17
浏览：141
楼主
chrisfang |
Q：怎样可以加快VBA程序的运行速度，提高VBA程序运行时的性能。
A：在硬件资源保持有限且不变的情况下，减少不必要的系统开销可以为VBA程序的运行提供更多的系统资源支持。除了VBA程序中本身的算法和代码优化以外，还可以采用关闭一些不太重要的功能来减少资源开销。
例如，可以在VBA程序中加入以下这些代码：
- '获取初始状态
- SU = Application.ScreenUpdating
- SB = Application.DisplayStatusBar
- Ca = Application.Calculation
- EE = Application.EnableEvents
- PB = ActiveSheet.DisplayPageBreaks
- '关闭部分功能
- Application.ScreenUpdating = False
- Application.DisplayStatusBar = False
- Application.Calculation = xlCalculationManual
- Application.EnableEvents = False
- ActiveSheet.DisplayPageBreaks = False
- '*********
- '程序代码部分
- '*********
- '恢复原始状态
- Application.ScreenUpdating = SU
- Application.DisplayStatusBar = SB
- Application.Calculation = Ca
- Application.EnableEvents = EE
- ActiveSheet.DisplayPageBreaks = PB
其中Application.ScreenUpdating表示屏幕显示的重绘；Application.DisplayStatusBar表示状态栏的显示；Application.Calculation指的是计算方式设置，采用手动重算方式可以减少系统开销；Application.EnableEvents可以设置是否响应触发事件；ActiveSheet.DisplayPageBreaks指的是分页符的显示。 |
2楼
yinxingshu |
这个帖子很有用唉！ |
3楼
水星钓鱼 |
这个应该被更多的人看到，收藏。 |
4楼
yaoyedan |
mark
|
5楼
yaoyedan |
mark |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一