返回一个
HTMLDivisions 集合,该集合代表 Web 文档中的 HTML DIV 元素。
语法
表达式.HTMLDivisions
表达式 必选。一个代表 Document 对象的变量。
示例
本示例设置活动文档中三个嵌套的区域的格式。本示例假定该活动文档为具有至少三个区域的 HTML 文档。
示例代码 |
function FormatHTMLDivisions() {
let htmldivisions = ActiveDocument.HTMLDivisions.Item(1)
let htmldivisions1 = htmldivisions.HTMLDivisions.Item(1)
let htmldivisions2 = htmldivisions1.HTMLDivisions.Item(1)
let borderleft = htmldivisions.Borders.Item(wdBorderLeft)
let borderright = htmldivisions.Borders.Item(wdBorderRight)
let bordertop = htmldivisions1.Borders.Item(wdBorderTop)
let borderbottom = htmldivisions1.Borders.Item(wdBorderBottom)
borderleft.Color = wdColorRed
borderleft.LineStyle = wdLineStyleSingle
borderright.Color = wdColorRed
borderright.LineStyle = wdLineStyleSingle
htmldivisions1.LeftIndent = InchesToPoints(1)
htmldivisions1.RightIndent = InchesToPoints(1)
bordertop.Color = wdColorBlue
bordertop.LineStyle = wdLineStyleDouble
borderbottom.Color = wdColorBlue
borderbottom.LineStyle = wdLineStyleDouble
htmldivisions2.LeftIndent = InchesToPoints(1)
htmldivisions2.RightIndent = InchesToPoints(1)
htmldivisions2.Borders.Item(wdBorderLeft).LineStyle = wdLineStyleDot
htmldivisions2.Borders.Item(wdBorderRight).LineStyle = wdLineStyleDot
htmldivisions2.Borders.Item(wdBorderTop).LineStyle = wdLineStyleDot
htmldivisions2.Borders.Item(wdBorderBottom).LineStyle = wdLineStyleDot
}
|