コメントの挿入・表示・全表示・削除 : Excel(エクセル)

Excel Tipsメニューに戻る

スポンサードリンク



Excel VBAでコメントを挿入するには、AddCommentメソッドを使用します。

セルを指定し表示させるには、セル.Comment.Visible = True に設定します。
非表示にするには、Visible = False に設定します。

全コメント表示には
Application.DisplayCommentIndicator = xlCommentAndIndicator

全コメントのマークのみ表示には
Application.DisplayCommentIndicator = xlCommentAndIndicatorOnly

全コメントを非表示にするには
Application.DisplayCommentIndicator = xlNoIndicator

コメントを消去するには
セル.ClearComments

Excelシート画面

■コメントを挿入したExcelシート
コメントマークが表示されています。
コメントを挿入したシート

■全コメントを表示
全コメントの表示シート

スポンサードリンク



Excel VBA実行コード

Private Sub CommandButton1_Click()
    
On Error Resume Next
    'コメントの挿入
    Range("F3").AddComment ("液晶テレビ")
    Range("F4").AddComment ("冷蔵庫")
    Range("F5").AddComment ("洗濯機")
    Range("F6").AddComment ("パソコン")
    Range("F7").AddComment ("アイロン")
    Range("F8").AddComment ("電子レンジ")
        
End Sub

Private Sub CommandButton2_Click()
    
    '冷蔵庫のコメント表示
    Range("F4").Comment.Visible = True

End Sub

Private Sub CommandButton3_Click()
    
    '全コメント表示
    Application.DisplayCommentIndicator = xlCommentAndIndicator

End Sub

Private Sub CommandButton4_Click()
    
    'コメントの消去
    Range("F3").ClearComments
    Range("F4").ClearComments
    Range("F5").ClearComments
    Range("F6").ClearComments
    Range("F7").ClearComments
    Range("F8").ClearComments

End Sub

Private Sub CommandButton5_Click()

    '冷蔵庫のコメント非表示
    Range("F4").Comment.Visible = True

End Sub

Private Sub CommandButton6_Click()
    
    '全コメント非表示
    Application.DisplayCommentIndicator = xlCommentIndicatorOnly

End Sub

Excel Tipsメニューに戻る

スポンサードリンク





■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


関連コンテンツ

Copyright (c) Excel-Excel ! All rights reserved