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

music-producer IT

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

Advertisements

AddCommentメソッドの使い方

コメントを追加する
対象.AddComment Text 文字列
addcomment1
今回はB2セルを対象にして、AddCommentメソッドで文字列を追加してみます。
現在いるセルを対象にしたい場合は、Range(“B2”)ActiveCellにしてください。
addcomment2
Range(“B2”).AddComment.Text “test”を実行すると、B2セルにコメントが追加されました。

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

addcomment3
AddCommentメソッドでコメントを追加するセルに、すでにセルにコメントが入力されている場合はエラーになります。
addcomment4
これを避けるには、TypeName関数を使ってセルにコメントが入力されているかを確認し、結果によって分岐するIf文を置いておくなどの対応をとります。
' vba
' コメント未入力の場合のみ処理を実行
If TypeName(Range("B2").Comment) <> "Comment" Then
Range("B2").AddComment.Text "test"
End If
Excel(エクセル):コメント
エクセルでセルに注釈をつけるコメント機能に関する操作・VBA等まとめページです。 コメント機能 基本的な、コメントを作成、編集する方法です。 コメントの表示・非表示を切り替える方法です。個別に設定も可能です。 ...
関数・演算子・メソッド・プロパティ名から探すExcel/VBA(マクロ)使い方・組み合わせ方まとめ
こちらはExcelやメソッドの諸機能を、機能の名称から探せるまとめ記事です。

コメント