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
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.