Borders.DistanceFrom (Word)

Retorna ou define um valor que indica se a borda da página especificada é medida da borda da página ou do texto ao redor. Leitura/gravação WdBorderDistanceFrom. Os valores de retorno possíveis são wdBorderDistanceFromPageEdge - Da borda da página, wdBorderDistanceFromText - Do texto dentro da borda.

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