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