Método HTMLDivision.HTMLDivisionParent (Word)
Devuelve un objeto HTMLDivision que representa la división primaria de la división HTML actual.
Sintaxis
expresión. HTMLDivisionParent
( _LevelsUp_
)
expresión requerida. Variable que representa un objeto "HTMLDivision".
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
LevelsUp | Opcional | Long | Número de divisiones primarias que hay que contar hacia atrás para devolver la división deseada. Si se omite el argumento LevelsUp, la división HTML devuelta está un nivel por encima de la división HTML actual. |
Valor devuelto
HTMLDivision
Ejemplo:
En este ejemplo se da formato a los bordes de dos divisiones HTML del documento activo. En este ejemplo se supone que el documento activo es un documento HTML con dos divisiones como mínimo.
Sub FormatHTMLDivisions()
With ActiveDocument.HTMLDivisions(1)
With .HTMLDivisions(1)
.LeftIndent = InchesToPoints(1)
.RightIndent = InchesToPoints(1)
With .Borders(wdBorderLeft)
.Color = wdColorBlue
.LineStyle = wdLineStyleDouble
End With
With .Borders(wdBorderRight)
.Color = wdColorBlue
.LineStyle = wdLineStyleDouble
End With
With .HTMLDivisionParent
.LeftIndent = InchesToPoints(1)
.RightIndent = InchesToPoints(1)
With .Borders(wdBorderTop)
.Color = wdColorBlack
.LineStyle = wdLineStyleDot
End With
With .Borders(wdBorderBottom)
.Color = wdColorBlack
.LineStyle = wdLineStyleDot
End With
End With
End With
End With
End Sub
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.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de