¿Cómo buscar y reemplazar texto dentro de los comentarios (notas) en Excel?

La función Buscar y Reemplazar de Excel es una herramienta poderosa para actualizar rápidamente el contenido dentro de las celdas, pero no se aplica directamente a las Notas, el nuevo nombre para los comentarios tradicionales anteriores a Excel 2019. Muchos usuarios se preguntan si es posible aplicar la misma funcionalidad al texto dentro de las Notas de Excel. Esta guía te mostrará cómo buscar y reemplazar texto en las Notas de manera efectiva, ampliando tu capacidad para gestionar y refinar todos los aspectos de tus hojas de cálculo.

Usar código VBA para buscar y reemplazar texto dentro de los comentarios (notas)

Una herramienta práctica para buscar y reemplazar texto dentro de los comentarios (notas) de forma rápida y sencilla

Usar código VBA para buscar y reemplazar texto dentro de los comentarios (notas)

En Excel, puedes usar el siguiente código VBA para buscar y reemplazar texto en todas las notas. Por ejemplo, reemplazaré el texto "2011" con el texto "2012" en todas las notas de Excel.

1. Haz clic en Desarrollador > Visual Basic y aparecerá una nueva ventana de Microsoft Visual Basic para Aplicaciones, haz clic en Insertar > Módulo y luego introduce el siguiente código VBA en el Módulo:

Código VBA: Buscar y reemplazar texto en todas las notas de 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. Luego haz clic en el botón para ejecutar el código, y todo "2011" en todas las notas será reemplazado por "2012" en todo el libro.

Una herramienta práctica para buscar y reemplazar texto dentro de los comentarios (notas) de forma rápida y sencilla

Podemos buscar y reemplazar texto rápidamente en todas las notas con Kutools para Excel’s Buscar/Reemplazar Texto de Nota.

Si has instalado Kutools para Excel, puedes buscar y reemplazar fácilmente el texto en todas las notas de Excel.

1. Haz clic en Kutools > Más > Buscar/Reemplazar Texto de Nota.

2. En el cuadro de diálogo Buscar/Reemplazar Texto de Nota:

• (1.) Selecciona el ámbito donde deseas aplicar esta utilidad, puedes seleccionar Hoja activa o Todas las hojas;
• (2.) Introduce el texto (2011) que deseas reemplazar en el cuadro Buscar texto en notas, e introduce el texto específico (2012) que deseas usar en el cuadro Reemplazar con.

3. Luego haz clic en el botón Reemplazar. Todo el texto 2011 será reemplazado por 2012 dentro de los comentarios en la hoja de trabajo activa. Ver capturas de pantalla:

Artículos relacionados:

• Cambiar todos los formatos de comentario en las celdas
• Cambiar el nombre del autor de todos los comentarios
• Listar todos los comentarios en una nueva hoja de trabajo o libro
• Mostrar u ocultar todos los comentarios e indicadores de comentarios en Excel
• Convertir el contenido de las celdas en comentarios en Excel
• Convertir comentarios en contenido de celdas en Excel