[已解决]screenupdating属性

dicky_MM

Application.ScreenUpdating=False是什么意思??

最佳答案

月排行榜 / 总排行榜

sunjing-zxl

2012-1-11 21:03

Application.ScreenUpdating 属性
如果启用屏幕更新，则该属性值为 True。Boolean 类型，可读写。

=False就是关闭屏幕更新
=frue就是启动屏更新
一般程序开始关闭
程序结束前启动

跳转到最佳答案楼层

sunjing-zxl

Application.ScreenUpdating 属性
如果启用屏幕更新，则该属性值为 True。Boolean 类型，可读写。

=False就是关闭屏幕更新
=frue就是启动屏更新
一般程序开始关闭
程序结束前启动

菜鸟锐

二楼的正解！！！！

dicky_MM

sunjing-zxl 发表于 2012-1-11 21:03
Application.ScreenUpdating 属性
如果启用屏幕更新，则该属性值为 True。Boolean 类型，可读写。

屏幕更新具体是指什么呢？是不是可有可无的呢？

Select

高手们及时回复了，如果问题解决了，最好给设置最佳。

Select

Select 发表于 2012-1-12 22:53
高手们及时回复了，如果问题解决了，最好给设置最佳。

引起显示变化的都是。举2个极端例子。

单元格a1对于100,也是。a到j列都对等于1，也是。

但后者引起的变化更大，最好使用。因为使用后能缩短显示时间

sunjing-zxl

dicky_MM 发表于 2012-1-12 22:00
屏幕更新具体是指什么呢？是不是可有可无的呢？

关闭屏幕更新主要是为了加快程序运算速度

比如比用循环要删除10行不连续的单元格。

如果不关闭屏幕更新程序运行就会没循环一次就要删除一行。
如果关闭屏幕更新就是，在程序运行的时候不显示删除行的屏幕变化。而是程序运行结束10行就全部删除完，中途变化不显示。

主要目的就是加快了程序运行速度

无聊的疯子

以下代码可看出screenupdating=false的效果
直接用F5对两个代码进行测试，
C1打开了屏幕刷新，这时候可以看到单元格中的内容一闪而过（代码最后将写入的内容删除掉，以说明效果）
C2关闭了屏幕刷新，这时候看不到任何动作
通常在对单元格进行过多的操作的时候，都会采用关闭屏幕刷新来提高运行速度

需要注意的是：即使闭关了屏幕刷新，使用F8对代码进行测试时，也是可以看到单元格中相应的变化的

1. 
   
2. Sub C1()
   
3.     Application.ScreenUpdating = True
   
4.     For x = 1 To 9
   
5.         For y = 1 To x
   
6.             Cells(x, y) = x & " X " & y & " = " & x * y
   
7.         Next
   
8.     Next
   
9.     Cells.Clear
   
10. End Sub
    
11. Sub C2()
    
12.     Application.ScreenUpdating = False
    
13.     For x = 1 To 9
    
14.         For y = 1 To x
    
15.             Cells(x, y) = x & " X " & y & " = " & x * y
    
16.         Next
    
17.     Next
    
18.     Cells.Clear
    
19. End Sub
    
20. 
    

复制代码

free1024

支持二楼的讲解。。。