TextStyles Property

Microsoft Publisher Visual Basic

collection that contains a publication's text styles.

expression.TextStyles

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

The following example displays the style name and base style of the first style in the TextStyles collection.

Sub BaseStyleName()
    With ActiveDocument.TextStyles(1)
        MsgBox "Style name= " & .Name _
            & vbCr & "Base style= " & .BaseStyle
    End With
End Sub