Word VBA教程:StyleSheet对象

   
StyleSheets
StyleSheet

该对象代表附加至 Web 文档的单独的级联样式表。StyleSheet对象是StyleSheets集合的一个成员。StyleSheets集合包含附加至指定文档的所有级联样式表。

使用 StyleSheet对象

使用Item方法或 StyleSheets集合的 StyleSheets(index) 可返回一个 StyleSheet对象,其中index 为样式表的名称或序号。下列示例从 StyleSheets集合中删除第二个样式表。


Sub WebStyleSheets()
    ActiveDocument.StyleSheets.Item(2).Delete
End Sub

使用Index属性可确定级联样式表的优先级。下列示例创建一个附加的级联样式表的表格,并根据样式表的重要性进行排序和索引。


Sub CSSTable()
    Dim styCSS As StyleSheet
    With ActiveDocument.Range(Start:=0, End:=0)
        .InsertAfter "CSS Name" & vbTab & "Index"
        .InsertParagraphAfter
        For Each styCSS In ActiveDocument.StyleSheets
            .InsertAfter styCSS.Name & vbTab & styCSS.Index
            .InsertParagraphAfter
        Next styCSS
        .ConvertToTable
    End With
End Sub

使用Move方法对附加的样式表的优先级重新排序。下列示例在所有附加的级联样式表中将优先级最高的样式表设为优先级最低的样式表。


Sub MoveCSS()
    ActiveDocument.StyleSheets(1) _
        .Move wdStyleSheetPrecedenceLowest
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号