檢視發行者) (物件
包含視窗或窗格的檢視屬性 (如全部顯示、功能變數網底、表格格線等)。
使用 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 支援與意見反應。