Subscript Property
Applies To
Font object.
Description
True if the font is formatted as subscript. Returns True, False or wdUndefined (a mixture of True and False). Can be set to True, False, or wdToggle. Read/write Long.
Remarks
Setting Subscript to True sets Superscript to False, and vice versa.
See Also
Font property, FormattedText property, Size property, Superscript property.
Example
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