Propiedad Borders.DistanceFrom (Word)

Devuelve o establece un valor que indica si el borde de página especificado se mide desde el borde de la página o desde el texto que rodea. WdBorderDistanceFrom de lectura y escritura.

Sintaxis

expresión. DistanceFrom

expresión obligatoria. Variable que representa una colección "Borders".

Ejemplo:

En este ejemplo se agrega un borde alrededor de cada una de las páginas de la sección uno del documento activo y, a continuación, se establece la distancia entre cada borde y el borde correspondiente de la página.

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

En este ejemplo se agrega un borde alrededor de cada una de las páginas de la primera sección de la selección y, a continuación, se establece la distancia entre el texto y el borde de la página en 6 puntos.

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

Consulte también

Objeto de colección Borders

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.