查看发布服务器) (对象
包含窗口或窗格的视图属性(全部显示、域底纹、表格虚框等)。
使用 Document.ActiveView 属性可返回 View 对象。
下面的示例将指定的缩放设置。
Sub ZoomFitSelection()
ActiveDocument.ActiveView.Zoom = pbZoomFitSelection
End Sub
以下示例分别在活动视图上进行放大和缩小。
Sub ViewZoomIn()
ActiveDocument.ActiveView.ZoomIn
End Sub
Sub ViewZoomOut()
ActiveDocument.ActiveView.ZoomOut
End Sub
以下示例将活动视图滚动到指定形状。
Sub ScrollToShape()
Dim shpOne As Shape
Set shpOne = ActiveDocument.Pages(1).Shapes(1)
ActiveDocument.ActiveView.ScrollShapeIntoView Shape:=shpOne
End Sub
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。