Returns a TextStyles 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.
This example demonstrates how text font of the first TextStyle object in the TextStyles collection is changed.
Sub ArialTwelve()
With Application.ActiveDocument.TextStyles(1).Font
.Bold = msoTrue
.Name = "arial"
.Size = 12
End With
End Sub