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メソッドを使って、メモを削除しておくと安心です。



コメント