Word VBA教程:ScreenUpdating属性

如果为 True,则启用屏幕更新。Boolean 类型,可读写。

expression.ScreenUpdating

expression   必需。该表达式返回一个Application对象。

说明

当运行某一过程时,ScreenUpdating属性控制显示器的主要变化情况。如果关闭屏幕更新,屏幕依然显示工具栏,并且 Word 仍允许此过程用状态栏提示、输入框、对话框或信息框等工具来显示和检索信息。关闭屏幕更新可提高某些过程的执行速度。如果此过程已结束,或由于某些错误而停止,请务必将 ScreenUpdating属性设为 True。

VBA示例

本示例将关闭屏幕更新,并添加一篇新文档。将 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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号