Excel VBA Font.Superscript代码不工作。
Excel VBA Font.Superscript代码不工作。
提问于 2015-10-01 16:23:31
此excel代码不工作。为什么？实际上，我无法使工作任何superscript代码。我使用Excel 2007
注意: intRow和intColumn是决定行和列的整数。
Cells(intRow, intColumn).Characters(Start:=Len(Cells(intRow, intColumn).Value), Length:=1).Font.Superscript = True回答 2
Stack Overflow用户
回答已采纳
发布于 2015-10-01 17:09:26
我发现了问题。它是细胞的format。一定是text。
在superscript行之前添加该行解决了问题：
Cells(intRow, intColumn).NumberFormat = "@"谢谢。
Stack Overflow用户
发布于 2015-10-01 16:55:51
你需要完全符合你所有的细胞条件。这样做是可行的：
Option Explicit
Public Sub test()
SuperscriptLastLetter 1, 1
End Sub
Public Sub SuperscriptLastLetter(ByVal lngRow As Long, ByVal lngCol As Long)
With ActiveSheet.Cells(lngRow, lngCol)
.Characters(Start:=Len(.Value), Length:=1).Font.Superscript = True
End With
End Sub
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/32892403
复制相关文章
相似问题
腾讯云开发者
