AddCommentメソッド
指定したセルにメモを追加することができます。
メモは単体のセルにしか実行ができないので、複数のセルに同じメモを追加する場合は
下記サンプルコードのようにループ処理を行う必要があります。
構文
Object.AddComment(Text)
Object | Rangeオブジェクトです。 |
Text | メモに表示する文字列です。省略可。 |
セルにメモを追加するサンプルコード
Public Sub Sample() '■A1セルにメモを追加する Range("A1").AddComment "memo" '■範囲を指定して同じメモを追加する Dim rng As Range For Each rng In Range("B1:B3") rng.AddComment "memo" Next rng '■メモを改行する Range("A2").AddComment Date & vbCrLf & _ "memo" & vbCrLf & "memomemo" End Sub
注意点
- 「メモ」とは、以前使われていた「コメント」のことです。
Excel2019以降の「コメント」は違う機能を持つので混同しないよう注意してください。 - 既にメモが存在するセルに上書きをすることはできません。エラーが出てしまいます。
メモを追加する前にClearCommentsメソッドを使って、メモを削除しておくと安心です。
コメント