Subscript Property

Microsoft PowerPoint Visual Basic

Determines whether the specified text is subscript. Read/write MsoTriState.

MsoTriState can be one of these MsoTriState constants.
msoCTrue
msoFalse Default. The specified text is not subscript.
msoTriStateMixed Some characters are subscript and some aren't.
msoTriStateToggle
msoTrue The specified text is subscript.

Remarks

Setting the BaselineOffset property to a negative value automatically sets the Subscript property to msoTrue and the Superscript property to msoFalse.

Setting the BaselineOffset property to a positive value automatically sets the Subscript property to msoFalse and the Superscript property to msoTrue.

Setting the Subscript property to msoTrue automatically sets the BaselineOffset property to – 0.25 ( – 25 percent).

Example

This example enlarges the first character in the title on slide one if that character is subscript.

With Application.ActivePresentation.Slides(1) _
        .Shapes.Title.TextFrame.TextRange
    With .Characters(1, 1).Font
        If .Subscript Then
            scaleChar = -20 * .BaselineOffset
            .Size = .Size * scaleChar
        End If
    End With
End With