Superscript Property [Excel 2003 VBA Language Reference]

True if the font is formatted as superscript; False by default. Read/write Variant.

Example

This example makes the last character in cell A1 a superscript character.

n = Worksheets("Sheet1").Range("A1").Characters.Count
Worksheets("Sheet1").Range("A1") _
    .Characters(n, 1).Font.Superscript = True

Applies to | Font Object

See Also | Characters Object | Subscript Property