Propiedad Range.HTMLDivisions (Word)
Devuelve un objeto HTMLDivisions que representa una división HTML en un documento web.
Sintaxis
expresión. HTMLDivisions
expresión obligatoria. Variable que representa un objeto Range.
Ejemplo:
En este ejemplo, se aplica formato a tres divisiones anidadas al documento activo. Se supone que el documento activo es un documento HTML con tres divisiones como mínimo.
Sub FormatHTMLDivisions()
With ActiveDocument.Range.HTMLDivisions(1)
With .Borders(wdBorderLeft)
.Color = wdColorRed
.LineStyle = wdLineStyleSingle
End With
With .Borders(wdBorderRight)
.Color = wdColorRed
.LineStyle = wdLineStyleSingle
End With
With .HTMLDivisions(1)
.LeftIndent = InchesToPoints(1)
.RightIndent = InchesToPoints(1)
With .Borders(wdBorderTop)
.Color = wdColorBlue
.LineStyle = wdLineStyleDouble
End With
With .Borders(wdBorderBottom)
.Color = wdColorBlue
.LineStyle = wdLineStyleDouble
End With
With .HTMLDivisions(1)
.LeftIndent = InchesToPoints(1)
.RightIndent = InchesToPoints(1)
With .Borders(wdBorderLeft)
.LineStyle = wdLineStyleDot
End With
With .Borders(wdBorderRight)
.LineStyle = wdLineStyleDot
End With
With .Borders(wdBorderTop)
.LineStyle = wdLineStyleDot
End With
With .Borders(wdBorderBottom)
.LineStyle = wdLineStyleDot
End With
End With
End With
End With
End Sub
Vea 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.