OfficeType

VBA~コメントを挿入しよう~Excel

VBAでセルにコメントを挿入したい場合はRange.AddCommentメソッドを設定します。Range("セル番地").AddComeent "挿入したいコメント"で挿入できます。

下のコードを実行するとセルA1にコメントが挿入されます。セルA1にマウスカーソルを乗せるとコメントが表示されます。

Sub test1()

Range("A1").AddComment "挿入したいコメント"

End Sub

image-01

image-02

コメントを常に表示する

コメントを常に表示したい場合はComment.VisibleプロパティをTrueに設定します。

下のコードを実行するとセルA1に挿入されたコメントが常に表示されます。

Sub test2()

Range("A1").AddComment "挿入したいコメント"
Range("A1").Comment.Visible = True

End Sub

image-03

コメントの改行

文字列を改行したい場合は改行コードvbLfを記述します。

下のコードを実行するとコメントの文字列が改行されて表示されます。

Sub test3()

Range("B2").AddComment "キャンペーン中" & vbLf & "通常価格200円"

End Sub

image-04