Propriété Borders.DistanceFrom (Word)

  • Article

Cette propriété renvoie ou définit une valeur qui indique si la bordure de page spécifiée est mesurée entre le bord de la page ou à partir du texte qu'elle entoure. En lecture/écriture WdBorderDistanceFrom.

Syntaxe

expression. DistanceFrom

expression Obligatoire. Variable qui représente une collection « Borders ».

Exemple

Cet exemple montre comment ajouter une bordure simple autour de chaque page de la première section du document actif, puis comment définir la distance entre chaque bordure et le bord de la page correspondante.

Dim borderLoop As Border 
 
With ActiveDocument.Sections(1) 
 For Each borderLoop In .Borders 
 borderLoop.LineStyle = wdLineStyleSingle 
 borderLoop.LineWidth = wdLineWidth050pt 
 Next borderLoop 
 With .Borders 
 .DistanceFrom = wdBorderDistanceFromPageEdge 
 .DistanceFromTop = 20 
 .DistanceFromLeft = 22 
 .DistanceFromBottom = 20 
 .DistanceFromRight = 22 
 End With 
End With

Cet exemple montre comment ajouter une bordure autour de chaque page de la première section de la sélection, puis comment affecter une valeur de 6 points à la distance entre le texte et la bordure de page.

Dim borderLoop As Border 
 
With Selection.Sections(1) 
 For Each borderLoop In .Borders 
 borderLoop.ArtStyle = wdArtSeattle 
 borderLoop.ArtWidth = 22 
 Next borderLoop 
 With .Borders 
 .DistanceFrom = wdBorderDistanceFromText 
 .DistanceFromTop = 6 
 .DistanceFromLeft = 6 
 .DistanceFromBottom = 6 
 .DistanceFromRight = 6 
 End With 
End With

Voir aussi

Borders, Collection d'objets

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.