admin 管理员组

文章数量: 1086019


2024年3月27日发(作者:用while怎么实现无限循环)

Excel高级技巧:VBA(宏)Application对象应用实例

Application对象代表整个Microsoft Excel应用程序,带有175个属性和52个方法,

可以设置整个应用程序的环境或配置应用程序。

--------------------------------------------------------------------------------

示例01-01:体验开/关屏幕更新(ScreenUpdating属性)

Sub 关闭屏幕更新()

MsgBox "顺序切换工作表Sheet1→Sheet2→Sheet3→Sheet2,先开启屏幕更新,

然后关闭屏幕更新"

Worksheets(1).Select

MsgBox "目前屏幕中显示工作表Sheet1"

Updating = True

Worksheets(2).Select

MsgBox "显示Sheet2了吗?"

Worksheets(3).Select

MsgBox "显示Sheet3了吗?"

Worksheets(2).Select

MsgBox "下面与前面执行的程序代码相同,但关闭屏幕更新功能"

Worksheets(1).Select

MsgBox "目前屏幕中显示工作表Sheet1" & Chr(10) & "关屏屏幕更新功能"

Updating = False

Worksheets(2).Select

MsgBox "显示Sheet2了吗?"

Worksheets(3).Select

MsgBox "显示Sheet3了吗?"

Worksheets(2).Select

Updating = True

End Sub


本文标签: 屏幕 应用程序 工作 对象