Excelでコメント付きのすべてのセルをハイライトするにはどうすればよいですか？

コメントは、Excelに重要な情報を記載するための便利な機能です。コメントを挿入すると、セルに小さな赤いインジケーターが表示されます。しかし、時々この赤いインジケーターが目立たないことがあります。そのため、特定の色を使ってコメント付きのすべてのセルをハイライトし、より目立つようにすることができます。詳細については、この記事をお読みください。

「ジャンプ」機能を使用してコメント付きのすべてのセルをハイライトする

VBAコードを使用してコメント付きのすべてのセルをハイライトする

「ジャンプ」機能を使用してコメント付きのすべてのセルをハイライトする

Excelでは、まずすべてのコメント付きセルを選択し、その後好きな色を設定できます。以下の手順に従ってください：

1. コメント付きのセルをハイライトしたいデータ範囲またはワークシート全体を選択します。

2. 次に、「ホーム」＞「検索と選択」＞「ジャンプ」とクリックします。スクリーンショットをご覧ください：

ヒント: ショートカットキー Ctrl + Gを押して「 ジャンプ」ダイアログを開き、「特殊」をクリックして「ジャンプ」ダイアログを開くことができます。

3. 「 ジャンプ」ダイアログボックスで、「コメント」オプションをチェックします。スクリーンショットをご覧ください：

4. 「OK」をクリックしてダイアログを閉じると、コメント付きのすべてのセルが選択範囲内で選択されます。スクリーンショットをご覧ください：

5. コメント付きのセルを選択後、「ホーム」タブの下にある「塗りつぶしの色」アイコンをクリックし、お好みの色を選択します。選択されたすべてのセルコメントが一度に色付けされます。スクリーンショットをご覧ください：

VBAコードを使用してコメント付きのすべてのセルをハイライトする

次のVBAコードを使用して、アクティブなワークシート内のすべてのセルコメントを即座にハイライトおよび色付けすることもできます：

1. コメント付きのセルをハイライトしたいワークシートをアクティブにします。

2. ALT + F11キーを押して「Microsoft Visual Basic for Applications」ウィンドウを開きます。

3. 「挿入」＞「 モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBAコード：コメント付きのすべてのセルをハイライトする

Sub ColorComments()
'Update 20141110
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub

4. F5キーを押してこのコードを実行すると、コメント付きのセルをハイライトしたい範囲を選択するよう促すポップアップボックスが表示されます。スクリーンショットをご覧ください：

5. 「OK」をクリックすると、選択範囲内のすべてのコメントが色付けされます。

注釈：

上記のコードでは、スクリプトRng.Interior.ColorIndex = 36の色コードを好きなものに変更できます。

関連記事：

Excelですべてのコメント位置をリセットするにはどうすればよいですか？

Excelでコメントインジケーターの色を変更するにはどうすればよいですか？

Excelでコメントに日付と時刻を自動追加するにはどうすればよいですか？