在word的VBA代码中,Application.ScreenUpdating=False不能关闭刷屏
在word的VBA代码中想关闭刷屏
Application.ScreenUpdating=False
调试过程中也发现这个值一直都是True,直接运行也发现还是不能关闭刷屏,请各位帮忙,谢谢了 --------------------编程问答-------------------- ScreenUpdating 属性
请参阅 应用于 示例 特性
如果为 True,则启用屏幕更新。Boolean 类型,可读写。
expression.ScreenUpdating
expression 必需。该表达式返回一个 Application 对象。
说明
当运行某一过程时,ScreenUpdating 属性控制显示器的主要变化情况。如果关闭屏幕更新,屏幕依然显示工具栏,并且 Word 仍允许此过程用状态栏提示、输入框、对话框或信息框等工具来显示和检索信息。关闭屏幕更新可提高某些过程的执行速度。如果此过程已结束,或由于某些错误而停止,请务必将 ScreenUpdating 属性设为 True。
示例
本示例将关闭屏幕更新,并添加一篇新文档。将 500 行文本添加至文档中。宏每隔 50 行选定一行并刷新屏幕。
Application.ScreenUpdating = False
Documents.Add
For x = 1 To 500
With ActiveDocument.Content
.InsertAfter "This is line " & x & "."
.InsertParagraphAfter
End With
If x Mod 50 = 0 Then
ActiveDocument.Paragraphs(x).Range.Select
Application.ScreenRefresh
End If
Next x
Application.ScreenUpdating = True
--------------------编程问答-------------------- 我也就是这样用的,发现无效啊。
放在过程开始和结束处,开始处设置
Application.ScreenUpdating = False
过程结束前设置
Application.ScreenUpdating = True
--------------------编程问答-------------------- 等待各位答疑啊,谢谢 --------------------编程问答--------------------
是可以用的
但好像Debug时没有效果,程序运行时才有效果
补充:VB , VBA