Superscript 属性

       

如果字体格式设为上标字符,则该值为 True,默认值为 FalseVariant 类型,可读写。

示例

本示例将 A1 单元格的最后一个字符设为上标字符。

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