Borders.DistanceFrom (Word)
Gibt einen Wert zurück, der angibt, ob der angegebene Seitenrahmen vom Seitenrand oder von dem umgebenden Text gemessen wird, oder legt diesen fest. Mögliche Rückgabewerte sind wdBorderDistanceFromPageEdge - Vom Seitenrand aus, wdBorderDistanceFromText - Vom umgebenden Text aus.
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