Excel-Excel !　コメントを追加し、書式を変更エクセルTips

コメントを追加し、書式を変更

コメントを追加するには、AddCommentメソッドを使います。コメントを削除するには、ClearComments メソッドを使います。コメントはシェープと同じような扱いになっているようです。
［使用例］
レンジ.AddComment "コメント文字"　：　コメントを指定レンジに追加します。
Selection.Comment.Shape.Select True　：　コメントを選択
Selection.Font.Color = vbRed　：　フォント色を赤色に設定
Selection.Font.ColorIndex = 5 ：　フォント色を青色に設定
Selection..Font.Bold = True ：　フォントを太字に設定
Selection.AutoSize = True ：　枠サイズを自動で設定するようにします
ActiveCell.Comment.Visible = False　：　コメントを非表示にします
ActiveCell.Comment.Visible = True　：　コメントを表示します

コマンドボタン　クリックイベント

Private Sub CommandButton1_Click()
    Range("B9").Select

    'コメントを追加
    ActiveCell.AddComment "マイクロソフトエクセルのVBAでプログラムを作る" & vbCrLf & _
        "Microsoft Excel VBA 実践入門"

    '追加したコメントを選択
    Selection.Comment.Shape.Select True
    'フォント色のセット
    Selection.Font.Color = vbRed
    '自動サイズにする
    Selection.AutoSize = True
    'コメントを非表示する(ポイントで表示)
    ActiveCell.Comment.Visible = False
End Sub

実行結果

Topへ　 Homeへ