本文由日文译成中文。
这是用 Excel VBA 在工作表的形状(自动形状)中添加和删除字符的记录。
要从形状中添加或删除字符,请使用 “TextFrame ”对象中 “Characters ”对象的 “Text ”属性。
< Sponsored Links >
在图表中添加文字的示例
在图中添加 “あいうえお” 字符。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
shp.TextFrame.Characters.Text = “あいうえお”
End Sub

从数字中删除字符的示例
删除数字中的字符。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
shp.TextFrame.Characters.Text = “”
End Sub

< Sponsored Links >
