Como encontrar e substituir texto dentro de comentários (notas) no Excel?
A função Localizar e Substituir do Excel é uma ferramenta poderosa para atualizar rapidamente o conteúdo dentro das células, mas ela não se aplica diretamente às Notas — o novo nome para os comentários tradicionais antes do Excel 2019. Muitos usuários se perguntam se é possível aplicar a mesma funcionalidade ao texto dentro das Notas do Excel. Este guia mostrará como encontrar e substituir texto efetivamente nas Notas, expandindo sua capacidade de gerenciar e refinar todos os aspectos de suas planilhas.
Usando código VBA para encontrar e substituir texto dentro de comentários (notas)
Usando código VBA para encontrar e substituir texto dentro de comentários (notas)
No Excel, você pode usar o seguinte código VBA para encontrar e substituir texto em todas as notas. Por exemplo, vou substituir o texto "2011" pelo texto "2012" em todas as notas no Excel.
1. Clique em Desenvolvedor > Visual Basic e uma nova janela Microsoft Visual Basic for Applications será exibida, clique em Inserir > Módulo e insira o seguinte código VBA no Módulo:
Código VBA: Encontrar e substituir texto em todas as notas no 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. Em seguida, clique no botão
para executar o código, e todo "2011" em todas as notas será substituído por "2012" em toda a pasta de trabalho.
Uma ferramenta prática para encontrar e substituir texto dentro de comentários (notas) de forma rápida e fácil
Podemos encontrar e substituir rapidamente o texto em todas as notas com Kutools para Excel’s Localizar/Substituir Texto de Nota.
Se você instalou Kutools para Excel, pode facilmente encontrar e substituir o texto em todas as notas no Excel.
1. Clique em Kutools > Mais > Localizar/Substituir Texto de Nota.
2. Na caixa de diálogo Localizar/Substituir Texto de Nota:
- (1.) Selecione o escopo onde deseja aplicar este utilitário, você pode selecionar Planilha Atual ou Todas as Planilhas;
- (2.) Insira o texto (2011) que deseja substituir na caixa Localizar texto em notas e insira o texto específico (2012) que deseja usar na caixa Substituir por.
3. E então clique no botão Substituir. Todos os 2011 serão substituídos por 2012 dentro dos comentários na planilha ativa. Veja as capturas de tela:
 |  |  |
Artigos relacionados:
- Alterar todos os formatos de comentário nas células
- Alterar o nome do autor de todos os comentários
- Listar todos os comentários em uma nova planilha ou pasta de trabalho
- Mostrar ou ocultar todos os comentários e indicadores de comentário no Excel
- Converter conteúdo de células em comentários no Excel
- Converter comentários em conteúdo de células no Excel
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins