マクロでセルにコメントを追加する場合、AddCommentメソッドを用います。もし既にセルにコメントが入力されている場合はエラーになるので、その対処法も書いてます。
マクロを使わないコメントの追加方法
AddCommentメソッドの使い方
コメントを追加する
対象.AddComment Text 文字列
対象.AddComment Text 文字列
![addcomment1](https://sunagitsune.com/wp-content/uploads/2020/07/addcomment1.jpg)
今回はB2セルを対象にして、AddCommentメソッドで文字列を追加してみます。
現在いるセルを対象にしたい場合は、Range(“B2”)をActiveCellにしてください。
現在いるセルを対象にしたい場合は、Range(“B2”)をActiveCellにしてください。
![addcomment2](https://sunagitsune.com/wp-content/uploads/2020/07/addcomment2-650x170.jpg)
Range(“B2”).AddComment.Text “test”を実行すると、B2セルにコメントが追加されました。
TypeName関数によるエラーの回避
![addcomment3](https://sunagitsune.com/wp-content/uploads/2020/07/addcomment3.jpg)
AddCommentメソッドでコメントを追加するセルに、すでにセルにコメントが入力されている場合はエラーになります。
![addcomment4](https://sunagitsune.com/wp-content/uploads/2020/07/addcomment4.jpg)
これを避けるには、TypeName関数を使ってセルにコメントが入力されているかを確認し、結果によって分岐するIf文を置いておくなどの対応をとります。
' vba
' コメント未入力の場合のみ処理を実行
If TypeName(Range("B2").Comment) <> "Comment" Then
Range("B2").AddComment.Text "test"
End If
![](https://sunagitsune.com/wp-content/uploads/2021/03/conversation-3513843_1280-160x90.jpg)
Excel(エクセル):コメント
エクセルでセルに注釈をつけるコメント機能に関する操作・VBA等まとめページです。
コメント機能
基本的な、コメントを作成、編集する方法です。
コメントの表示・非表示を切り替える方法です。常時表示も可能です。
...
![](https://sunagitsune.com/wp-content/uploads/2018/12/mathematics-1509559_1280-160x90.jpg)
関数・演算子・メソッド・プロパティ名から探すExcel/VBA(マクロ)使い方・組み合わせ方まとめ
こちらはExcelやメソッドの諸機能を、機能の名称から探せるまとめ記事です。
コメント