Share via

ncssSub Property

  • Article

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

Applies to | IFPStyleState Object