Excel VBA シート上の図形の文字サイズを変更する-TextFrame.Characters.Font.Size

Excel VBAでシート上にある図形の文字サイズを変更する記録です。

下図は、Excel2016です。

< スポンサーリンク >

例

図形に「あいうえお」というテキスト追加し、文字サイズを１５ポイントに設定します。

Sub test()
    Dim shp As Shape
    Set shp = ActiveSheet.Shapes(1)

    With shp.TextFrame.Characters
        .Text = “あいうえお”
        .Font.Size = 15
    End With
End Sub

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします