Excel VBA セルのコメントの大きさ（高さ、幅）を自動にしたり任意の大きさに設定する-Height、Width、AutoSize

Excel VBAでセルのコメントの大きさ（高さや幅）を好きな大きさに設定したり、コメントの文字の大きさに自動で調整する設定の記録です。

下図はExcel2016です。

< スポンサーリンク >

例

高さを設定するには「Height」プロパティ、幅を設定するには「Width」プロパティ、文字に合わせて自動で設定するには「AutoSize」プロパティを使います。

コメントの高さを12ポイント、幅を50ポイントで設定してみます。

Sub test()
    Dim Rng As Range
    Set Rng = Range(“B5”)

    With Rng.Comment.Shape
        .Height = 12
        .Width = 50
    End With
End Sub

コメントの大きさを文字に合わせて自動調節するように設定してみます。

Sub test()
    Dim Rng As Range
    Set Rng = Range(“B5”)

    Rng.Comment.Shape.TextFrame.AutoSize = True
End Sub

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