DisplayCommentlndicatorプロパティ
メモの表示設定を一括で行うには、DisplayCommentlndicatorプロパティを使用します。
Excelのメモは追加するとセルに赤い三角形のマークがつきますが、
赤いマークを表示するかどうかも指定することができます。
構文
Application.DisplayCommentIndicator = 下記設定値
| xlCommentAndIndicator | 1 | 常にメモと赤いマークを表示します |
| xlCommentIndicatorOnly | -1 | 赤いマークのみを表示します。 マウスポインターをセルの上に移動させるとメモを表示します。 |
| xlNoIndicator | 0 | メモと赤いマークを常に表示しません。 |
メモの表示設定を確認するサンプルコード
Public Sub Sample()
'複数のメモを追加する
Dim rng As Range
For Each rng In Range("A1:A3")
rng.AddComment "memo"
Next rng
'メモを全て非表示にする
Application.DisplayCommentIndicator = xlNoIndicator
'メモを常に表示させる
Application.DisplayCommentIndicator = xlCommentAndIndicator
'赤いマークのみ表示させる
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub
注意点
- 「メモ」とは、以前使われていた「コメント」のことです。
Excel2019以降の「コメント」は違う機能を持つので混同しないよう注意してください。 - メモの表示設定は、設定後も継続するので随時変更する必要があります。
コメント