FrontPage VBA教程:styleSheets属性

返回 FPHTMLStyleSheetsCollection集合,该集合代表当前文档中所有样式表的集合。

expression.styleSheets

expression  必选。返回DispFPHTMLDocument对象的表达式。

说明

导入的样式表包含在 <STYLE> 元素中,并可以通过 imports集合来使用。

VBA示例

下列示例创建对当前文档样式表集合的引用,并显示集合中每个样式表的标题(如果存在)。


Sub ReturnStyleSheets()
'Returns a collection of a style sheets in the document
    Dim objApp As FrontPage.Application
    Dim objStyleSheets As FPHTMLStyleSheetsCollection
    Dim objStyleSheet As FPHTMLStyleSheet
    Set objApp = FrontPage.Application
    Set objStyleSheets = objApp.ActiveDocument.styleSheets
    'For each style sheet in the document
    For Each objStyleSheet In objStyleSheets
        'if it has a title, display it
        If objStyle.Title <> "" Then
            MsgBox objStyleSheet.Title
        End If
    Next objStyleSheet
End Sub

上页:FrontPage VBA教程:SlowPage属性 下页:FrontPage VBA教程:SubTree属性

FrontPage VBA教程:styleSheets属性

FrontPage VBA教程:SubTree属性 FrontPage VBA教程:SubViewMode属性
FrontPage VBA教程:System属性 FrontPage VBA教程:Template属性
FrontPage VBA教程:ThemeProperties属性 FrontPage VBA教程:Themes属性
FrontPage VBA教程:Title属性 FrontPage VBA教程:Type属性
FrontPage VBA教程:URL属性 FrontPage VBA教程:UserName属性
FrontPage VBA教程:VBE属性 FrontPage VBA教程:Version属性
FrontPage VBA教程:VerticalResolution属性 FrontPage VBA教程:ViewMode属性
FrontPage VBA教程:ViewModeEx属性 FrontPage VBA教程:Visible属性
FrontPage VBA教程:vlinkColor属性 FrontPage VBA教程:Web属性
FrontPage VBA教程:webbots属性 FrontPage VBA教程:Webs属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号