Excelでコメント付きのすべてのセルを強調表示するにはどうすればよいですか？

コメントは、Excelで重要な情報を書き込むための便利な機能です。コメントを挿入すると、セルに小さな赤いインジケーターが表示されます。 ただし、赤いインジケーターがあまり目立たない場合もあるため、特定の色のコメントですべてのセルを強調表示して、目立たせることができます。 詳細については、この記事をお読みください。

Go To Special機能を使用して、コメント付きのすべてのセルを強調表示します

VBAコードでコメント付きのすべてのセルを強調表示する

Go To Special機能を使用して、コメント付きのすべてのセルを強調表示します

Excelでは、最初にすべてのコメントセルを選択してから、好きな色を付けることができます。次のようにしてください。

1。 コメントでセルを強調表示するデータ範囲またはワークシート全体を選択します。

2。 次に、をクリックします ホーム > 検索と選択 > 特別に行く、スクリーンショットを参照してください：

先端：ショートカットを押すことができます Ctrl + G を開く へ行きます ダイアログをクリックし、 スペシャル を開く 特別に行く ダイアログ。

3。 の中に 特別に行く ダイアログボックス、チェック コメント オプション、スクリーンショットを参照してください：

4。 次に、をクリックします OK このダイアログを閉じ、コメント付きのすべてのセルが選択で選択されている場合は、スクリーンショットを参照してください。

5。 コメントセルを選択したら、 塗りつぶしの色 アイコンの下に ホーム タブをクリックし、好きな色をXNUMXつ選択すると、選択したすべてのセルコメントが一度に色付けされます。スクリーンショットを参照してください。

VBAコードでコメント付きのすべてのセルを強調表示する

次のVBAコードを使用して、アクティブなワークシートのすべてのセルコメントをすぐに強調表示して色を付けることもできます。

1。 コメントセルを強調表示するワークシートをアクティブにします。

2。 を押し続けます Alt + F11 キーを押して Microsoft Visual Basic forApplicationsウィンドウ.

3に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュールウィンドウ.

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、選択したすべてのコメントが色で強調表示されています。

Note:

上記のコードでは、スクリプトのカラーインデックスを変更できます Rng.Interior.ColorIndex = 36 あなたのように。

関連記事：

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

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

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