コメントを設定する

Excel VBA を使って指定したセルに対してコメントを設定する方法を解説します。

(2022 年 06 月 14 日公開 / 2022 年 06 月 14 日更新)

コメントを設定する

コメントを設定するには、コメントを付けたいRangeオブジェクトに対して「AddComment」メソッドを使います。

Dim range1 As Range

Set range1 = Range("A1")
range1.AddComment Text:="コメント"

設定するコメントは「Text」引数に文字列で設定します。

まとめて次のように記述しても構いません。

Range("A").AddComment Text:="コメント"

サンプルプログラム

では簡単なサンプルで試してみましょう。

Sub テスト()

    Dim range1 As Range
        
    Set range1 = Range("B2")
    range1.AddComment Text:="2006年9月度"
    
End Sub

上記マクロを実行すると次のようになります。

コメントの設定

セルB2にコメントを設定しました。コメントが設定されているセルは、セルの右上が少し赤くなっています。デフォルトではセルの上にマウスが乗っている時にだけコメントが表示されます。

コメントの設定

-- --

Excel VBA を使って指定したセルに対してコメントを設定する方法を解説しました。

( Written by Tatsuo Ikura )

広告
Profile
profile_img

著者 / TATSUO IKURA

初心者~中級者の方を対象としたプログラミング方法や開発環境の構築の解説を行うサイトの運営を行っています。