Partager via


Propriété Application.SnapToGuides (Publisher)

True pour que Microsoft Publisher utilise les repères pour aligner les objets sur une page dans une composition. Boolean (en lecture/écriture).

Syntaxe

expression. SnapToGuides

expressionUne variable qui représente un objetApplication.

Valeur renvoyée

Booléen

Exemple

Cet exemple ajoute des repères de règle horizontaux et verticaux tous les demi-pouces (1,27 cm) sur la première page puis il définit les options de manière à aligner les objets de la page sur les repères.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.