共用方式為


Publisher) (Application.SnapToObjects 屬性

True 是表示 為 Microsoft Publisher 以輔助其他物件使用頁面上的物件。 可讀寫的 Boolean

語法

運算式SnapToObjects

expression 代表 Application 物件的變數。

傳回值

布林值

範例

本範例在第一頁上每半英吋新增水平和垂直尺規輔助線,並設定選項將頁面上的物件對齊輔助線。

Sub SetSnapOptions() 
 Dim intCount As Integer 
 Dim intPos As Integer 
 With ActiveDocument.Pages(1).RulerGuides 
 For intCount = 1 To 16 
 intPos = intPos + 36 
 .Add Position:=intPos, Type:=pbRulerGuideTypeVertical 
 Next 
 intPos = 0 
 For intCount = 1 To 21 
 intPos = intPos + 36 
 .Add Position:=intPos, Type:=pbRulerGuideTypeHorizontal 
 Next 
 End With 
 With Application 
 .SnapToGuides = True 
 .SnapToObjects = True 
 End With 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應