如何在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中自動添加評論的日期和時間？