本文由日文译成中文。
这是使用Excel VBA 更改工作表中形状(自动形状)字体大小的记录。
要更改形状上的字体大小,请使用 “TextFrame”对象中 “Characters”对象的 “Font.Size”属性。
< Sponsored Links >
更改形状(自动形状)文字大小的示例
在图中添加文字 “あいうえお”,并将字体大小设置为 15 点。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
With shp.TextFrame.Characters
.Text = “あいうえお”
.Font.Size = 15
End With
End Sub

< Sponsored Links >
