如何在 Excel 中尋找和取代註釋（註釋）中的文字？

Excel 的尋找和取代功能是快速更新儲存格內內容的強大工具，但它並不會直接應用於「註解」—Excel 2019 之前傳統註解的新名稱。 「註釋」。本指南將向您展示如何有效地找到和取代 Notes 中的文本，從而擴展您管理和完善電子表格各個方面的能力。

使用 VBA 程式碼尋找並取代註釋（註釋）中的文本

一個方便的工具，可以快速輕鬆地找到和替換評論（註釋）中的文本

使用 VBA 程式碼尋找並取代註釋（註釋）中的文本

在 Excel 中，您可以使用以下 VBA 程式碼來尋找和取代所有註解中的文字。例如，我將Excel中所有筆記中的文字「2011」替換為文字「2012」。

1。 點擊 開發者 >Visual Basic中 和一個新的 Microsoft Visual Basic for Applications 將顯示一個窗口，單擊 插入 > 模塊 然後在模塊中輸入以下VBA代碼：

VBA 程式碼：尋找並取代 Excel 中所有註解中的文字

Sub ReplaceNotes()
'Updated by Extendoffice 2024/07/25   
    Dim cell As Range
    Dim wks As Worksheet
    Dim sFind As String
    Dim sReplace As String
    Dim sNote As String

    ' Define the text to find and replace
    sFind = "2011"
    sReplace = "2012"

    ' Loop through each worksheet in the active workbook
    For Each wks In ActiveWorkbook.Worksheets
        For Each cell In wks.Cells
            If cell.NoteText <> "" Then
                sNote = cell.NoteText
                If InStr(sNote, sFind) > 0 Then
                    sNote = Replace(sNote, sFind, sReplace)
                    cell.NoteText Text:=sNote, Start:=1, Length:=Len(cell.NoteText)
                End If
            End If
        Next cell
    Next wks
End Sub

  

2。 然後點擊   按鈕運行程式碼，所有註解中的所有「2011」將被整個工作簿中的「2012」取代。

一個方便的工具，可以快速輕鬆地找到和替換評論（註釋）中的文本

我們可以快速找到並替換所有筆記中的文本 Excel的Kutools“ 尋找/取代註釋文本.

如果您已經安裝了Kutools for Excel，您可以輕鬆尋找並取代Excel中所有筆記中的文字。

1。 點擊 庫工具 > 更多 > 尋找/取代註釋文本。 看截圖：

2。 在 尋找/取代註釋文本 對話框：

• （1.）選擇要應用此實用程序的範圍，可以選擇 活動表 or 所有工作表;
• （2.）在文本框中輸入要替換的文本（2011）。 在筆記中尋找文字 框，然後在對話框中輸入要使用的特定文本（2012） 更換 框。

3。 然後點擊 更換 按鈕。活動工作表中註釋中的 2011 年全部內容將替換為 2012 年。看截圖：

相關文章：

• 更改單元格中的所有註釋格式
• 更改所有評論的作者姓名
• 將所有評論列出到新工作表或工作簿中
• 在Excel中顯示或隱藏所有註釋和註釋指示符
• 將單元格內容轉換為Excel中的註釋
• 將註釋轉換為Excel中的單元格內容