Font.Subscript property (Word)
True if the font is formatted as subscript. Read/write Long.
expression.Subscript
expression An expression that returns a Font object.
Returns True, False or wdUndefined (a mixture of True and False). Can be set to True, False, or wdToggle.
Setting the Subscript property to True sets the Superscript property to False, and vice versa.
This example inserts text at the beginning of the active document and formats the tenth character as subscript.
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
myRange.InsertAfter "Water = H20"
myRange.Characters(10).Font.Subscript = True
This example checks the selected text for subscript formatting.
If Selection.Type = wdSelectionNormal Then
mySel = Selection.Font.Subscript
If mySel = wdUndefined Or mySel = True Then
MsgBox "Subscript text exists in the selection."
Else
MsgBox "No subscript text in the selection."
End If
Else
MsgBox "You need to select some text."
End If
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.