VBA~コメントを挿入しよう~Excel
VBAでセルにコメントを挿入したい場合はRange.AddCommentメソッドを設定します。Range("セル番地").AddComeent "挿入したいコメント"で挿入できます。
下のコードを実行するとセルA1にコメントが挿入されます。セルA1にマウスカーソルを乗せるとコメントが表示されます。
Sub test1() Range("A1").AddComment "挿入したいコメント" End Sub
コメントを常に表示する
コメントを常に表示したい場合はComment.VisibleプロパティをTrueに設定します。
下のコードを実行するとセルA1に挿入されたコメントが常に表示されます。
Sub test2() Range("A1").AddComment "挿入したいコメント" Range("A1").Comment.Visible = True End Sub
コメントの改行
文字列を改行したい場合は改行コードvbLfを記述します。
下のコードを実行するとコメントの文字列が改行されて表示されます。
Sub test3() Range("B2").AddComment "キャンペーン中" & vbLf & "通常価格200円" End Sub