通过

Application.ScreenUpdating 属性 (Word)

  • 项目

如果屏幕更新已启用，此属性的值为 True。 读/写 Boolean。

语法

expression.ScreenUpdating

表达 返回 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 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。