Поделиться через


Свойство Application.SnapToObjects (Publisher)

Значение true для Microsoft Publisher, чтобы использовать объекты на странице для выстраивать другие объекты. Для чтения и записи, Boolean.

Синтаксис

expression. SnapToObjects

выражение: переменная, представляющая объект Application.

Возвращаемое значение

Boolean

Пример

В этом примере добавляются горизонтальные и вертикальные направляющие линейки каждую половину дюйма на первой странице и задаются параметры для выравнивания объектов на странице по направляющим.

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 и обратная связь.