ncssSub Property
Returns a Boolean that specifies if the text will appear as subscript.
expression.ncssSub
expression Required. An expression that returns one of the objects in the Applies To list.
Example
The following example formats all text within STRONG elements as subscript.
Sub NcssSubTag()
Dim objSs As IFPStyleState
Dim objLine1 As IHTMLElement
Dim strHTML As String
strHTML = "<strong>This is a sample that will appear as subscript.</strong>"
Application.ActiveDocument.body.innerHTML = strHTML
For Each objLine1 In Application.ActiveDocument.all.tags("strong")
Set objSs = Application.ActiveDocument.createStyleState
objSs.gatherFromElement objLine1
objSs.ncssSub = True
objSs.apply
Next objLine1
End Sub