excel学习库

excel表格_excel函数公式大全_execl从入门到精通

屏幕刷新(ScreenUpdating)的关闭与打开

这套《VBA之Excel应用》是非常经典的,无论是理论知识还是具体应用,内容都非常丰富,同时在讲解的过程中我会从我多年实践的角度给大家以不经意间的指导,让大家在不知觉间会更好的利用VBA这个工具。是的,代码习惯非常重要。 今日讲解的内容是“VBA之EXCEL应用”的第十四章“应用程序对象(Application Object)”的第2节“屏幕刷新(ScreenUpdating)的关闭与打开”。这套教程从简单的录制宏开始讲解,一直到窗体的搭建,内容丰富,实例众多。大家可以非常容易的掌握相关的知识,这套教程面向初学人员,共三册,十七章,都是我们在利用EXCEL工作过程中需要掌握的知识点,希望大家能掌握利用。 第二节 屏幕刷新(ScreenUpdating)的关闭与打开 为了提高代码的运行速度,我们往往会使用一个最为方便的方法,就是关闭屏幕刷新,这种操作是什么含义呢?我们在这讲就来给大家讲解。 1 Application.ScreenUpdating属性 语法:expression.ScreenUpdating 其中expression表示 Application 对象的变量 如果屏幕更新已启用,此属性的值为 True。 读/写 Boolean。 禁用屏幕更新可以加快宏代码的速度。虽然无法实时了解代码的最新动态,但它的运行速度会变快。当宏结束运行后,请记住将 ScreenUpdating 属性设置回 True。利用的语句: Application.ScreenUpdating = False Application.ScreenUpdating = True 2 关闭屏幕刷新的代码示例 我们将利用下面的代码测试比较一下打开和关闭屏幕刷新的代码运行时间,代码如下: Sub mynzB() Dim T(2) Application.ScreenUpdating = True For i = 1 To 2 If i = 2 Then Application.ScreenUpdating = False startTime = Time Worksheets("Sheet2").Activate For Each c In ActiveSheet.Columns If c.Column Mod 2 = 0 Then c.Hidden = True End If Next c stopTime = Time T(i) = (stopTime - startTime) * 24 * 60 * 60 Next Application.ScreenUpdating = True MsgBox "screen updating on: " & T(1) & _ " sec." & Chr(13) & _ "screen updating off: " & T(2) & _ " sec." End Sub 代码截图:代码讲解:以上代码将工作表的双数列隐藏。第一次运行是没有关闭屏幕刷新,第二次运行是关闭屏幕刷新,最后提示给用户两次运行的时间比较。 我们看最后弹出的结果:我们看到两者的运行时间相差了11秒之多,可见打开和关闭屏幕刷新对于代码运行时间影响还是明显的。 3 打开屏幕刷新的视觉效果 在上面的讲解中,我们了解到,屏幕刷新的打开和关闭对代码的运行速度有一定的影响,我们再来比较一下两者在运行过程中的不同,我们看下面的代码: Sub mynzC() '打开屏幕刷新的视觉效果 Dim i As Integer For i = 1 To 10000 Range("A1").Value = i Next End Sub 代码截图:代码讲解:这段代码就是将1到10000的值填充到单元格A1中,代码在运行时我们会看到实时的刷新过程。在A1单元格中数字是不断变化的。 代码的运行效果:4 关闭屏幕的刷新的视觉效果 下面我们关闭屏幕的刷新,代码: Sub mynzD() '关闭屏幕刷新的视觉效果 Dim i As Integer Application.ScreenUpdating = False For i = 1 To 10000 Range("A1").Value = i Next Application.ScreenUpdating = True End Sub 代码截图:代码讲解:(略) 代码的运行效果:此时我们只能看到代码的最后运行结果。 5 关闭和打开屏幕刷新的应用建议 从以上讲解中,我们可以看到,关闭屏幕刷新可以提高程序的运行时间,但降低视觉效果;如果打开屏幕刷新可以提高程序的视觉效果,提高用户的心理预期,但程序的运行时间会有一定的影响。VBA是利用Office实现个人小型办公自动化的有效手段(工具),我们要兼顾两者。 在实际写代码的时候,我往往是侧重于视觉效果的,这样可以: 1) 让程序的运行可视,操作者可以随时知道程序运行到了哪里。 2) 让应用这个程序的人有个主动的感觉,好像是自己在操控着程序的运行。这也是从心理上来取悦程序的使用者。 大家可以在实际的应用中逐渐体会。 今日内容回向: 1 打开和关闭屏幕刷新的语句是什么? 2 打开和关闭屏幕刷新的作用是什么? 3) 打开和关闭屏幕刷新如何利用?本讲内容参考程序文件:工作簿14.xlsm 分享成果,随喜正能量 VBA的学习教程(初级、中级、高级): VBA是利用Office实现个人小型办公自动化的有效手段(工具)。这是我对VBA的应用界定。在取代OFFICE新的办公软件没有到来之前,谁能在数据处理方面做到极致,谁就是王者。其中登峰至极的技能非VBA莫属!我记得20年前自己初学VBA时,那时的资料甚少,只能看源码自己琢磨,真的很难。20年过去了,为了不让学习VBA的朋友重复我之前的经历,我根据自己多年VBA实际利用经验,推出了八部VBA专门教程,学习顺序七、一(或者四)、三、二、六、五;或者七、八。其中七,一(或者四)是初级;三,二,八是中级;六,五是高级.

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

«    2024年12月    »
1
2345678
9101112131415
16171819202122
23242526272829
3031
控制面板
您好,欢迎到访网站!
  查看权限
网站分类
搜索
最新留言
    文章归档
      友情链接