ExcelVBA（マクロ）でセルにコメントを追加する方法/AddCommentメソッドの使い方

マクロでセルにコメントを追加する場合、AddCommentメソッドを用います。もし既にセルにコメントが入力されている場合はエラーになるので、その対処法も書いてます。
マクロを使わないコメントの追加方法

AddCommentメソッドの使い方

今回はB2セルを対象にして、AddCommentメソッドで文字列を追加してみます。
現在いるセルを対象にしたい場合は、Range(“B2”)をActiveCellにしてください。

Range(“B2”).AddComment.Text “test”を実行すると、B2セルにコメントが追加されました。

TypeName関数によるエラーの回避

AddCommentメソッドでコメントを追加するセルに、すでにセルにコメントが入力されている場合はエラーになります。

これを避けるには、TypeName関数を使ってセルにコメントが入力されているかを確認し、結果によって分岐するIf文を置いておくなどの対応をとります。

' vba
' コメント未入力の場合のみ処理を実行
If TypeName(Range("B2").Comment) <> "Comment" Then
Range("B2").AddComment.Text "test"
End If

Excel（エクセル）：コメント

エクセルでセルに注釈をつけるコメント機能に関する操作・VBA等まとめページです。 コメント機能 基本的な、コメントを作成、編集する方法です。 コメントの表示・非表示を切り替える方法です。常時表示も可能です。 ...

sunagitsune.com

2021.03.22

関数・演算子・メソッド・プロパティ名から探すExcel/VBA（マクロ）使い方・組み合わせ方まとめ

こちらはExcelやメソッドの諸機能を、機能の名称から探せるまとめ記事です。

sunagitsune.com

2018.12.30