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

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