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