string - 尝试用 VBA 代码编写(小数)的幂

Question

我不知道如何在 Excel 中写入单元格的功能。我可以使用 chr(185)、chr(178) 和 chr(179) 来显示 1,2 和 3 的幂，但我不能做任何其他数字。

Answer 1

您有 2 个选择:

使用 unicode 字符

使用单元格格式

我认为格式化方法是正常使用的首选，因为它非常灵活(例如，很容易上标整个代数表达式，如 x^(n-1) )。

但是，如果您最终导出为 CSV 或其他格式，则 Excel 格式将不会保留，在这种情况下，您应该使用方法 1。此外，使用此方法可以在公式中传递上标字符，与不能的实际单元格格式。

使用 Unicode 字符

使用 ChrW(charcode)功能。

charcode 可以是 unicode 字符的十进制或十六进制数。

字符是:

SuperscriptHex        Dec        
0          2070       8304       
1          00B9       185        
2          00B2       178        
3          00B3       179        
4          2074       8308       
5          2075       8309       
6          2076       8310       
7          2077       8311       
8          2078       8312       
9          2079       8313    

(引用unicode表: http://en.wikipedia.org/wiki/Unicode_subscripts_and_superscripts)

您可以使用 &H作为表示后面的字符应解释为十六进制的文字，如 ChrW(&H2077) .

使用单元格格式

一个 Range对象有 Characters返回 Characters 的属性允许不同的对象 Font对象到字符串的不同部分。通常情况下， Range.Font应用于整个文本。

请注意 Font还有许多其他属性可以应用于子字符串，例如粗体/大小等。

示例:

'Method 1 - Unicode
ActiveCell.Value = "x" & ChrW(&H2079)

'Method 2 - Formatting
With ActiveCell.Offset(1, 0)
    .Value = "x9"
    .Characters(2, 1).Font.Superscript = True '2,1 is a substring from 2nd char for 1 char
End With