Borders.DistanceFrom-Eigenschaft (Word)

Gibt einen Wert zurück oder legt einen Wert fest, der angibt, ob der angegebene Seitenrahmen vom Rand der Seite oder vom textumschließend gemessen wird. WdBorderDistanceFrom-Wert mit Lese-/Schreibzugriff.

Syntax

expression. DistanceFrom

Ausdruck: Erforderlich. Eine Variable, die eine "Borders"-Auflistung darstellt.

Beispiel

In diesem Beispiel wird um alle Seiten in Abschnitt 1 des aktiven Dokuments ein Rahmen gelegt und anschließend der Abstand zwischen jedem Rahmen und dem entsprechenden Seitenrand festgelegt.

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

In diesem Beispiel wird um jede Seite im ersten Abschnitt in der Auswahl ein Rahmen gelegt und anschließend 6 Punkte als Abstand zwischen Text und Seitenrahmen festgelegt.

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

Siehe auch

Borders-Auflistungsobjekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.