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