Como localizar e substituir texto dentro dos comentários (notas) no Excel?
A função Localizar e Substituir do Excel é uma ferramenta poderosa para atualizar rapidamente conteúdos nas células, mas não se aplica diretamente às Notas — a designação Novo Nome atribuída aos comentários tradicionais anteriores ao Excel 2019. Muitos utilizadores perguntam-se se é possível aplicar essa mesma funcionalidade ao texto existente nas Notas do Excel. Este guia mostra-lhe como localizar e substituir eficazmente texto nas Notas, ampliando a sua capacidade de gerir e refinar todos os aspetos das suas folhas de cálculo.
Utilizar código VBA para Localizar e Substituir texto dentro dos comentários (notas)
Utilizar código VBA para Localizar e Substituir texto dentro dos comentários (notas)
No Excel, pode utilizar o seguinte código VBA para localizar e substituir texto em todas as notas. Por exemplo, substituirei o texto «2011» por «2012» em todas as notas do Excel.
1. Clique em Programador > Visual Basic e será apresentada uma nova janela do Microsoft Visual Basic para Aplicações. Em seguida, clique em Inserir > Módulo e introduza o seguinte código VBA no módulo:
Código VBA: Localizar 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 todas as ocorrências de «2011» em todas as notas serão substituídas por «2012» em todo o livro.
Uma ferramenta prática para Localizar e Substituir texto dentro dos comentários (notas) de forma rápida e fácil
Localize e substitua texto rapidamente em todas as notas com a funcionalidade Kutools para Excel’s Localizar/Substituir Texto nas Notas.
Se tiver o Kutools para Excel instalado, pode localizar e substituir facilmente texto em todas as notas no Excel.
1. Clique em Kutools > Mais > Localizar/Substituir Texto nas Notas.
2. Na caixa de diálogo Localizar/Substituir Texto nas Notas:
- (1.) Selecione o âmbito que pretende aplicar a esta utilidade; pode selecionar Planilha Atualou Todas as folhas;
- (2.) Introduza o texto (2011) que pretende substituir na caixa Localizar texto nas notas e insira o texto específico (2012) que pretende utilizar na caixa Substituir por.
3. Em seguida, clique no botão Substituir. Todas as ocorrências de 2011 serão substituídas por 2012 nos comentários da folha ativa. Veja as capturas de ecrã:
 |  |  |
Artigos relacionados:
- Alterar todos os formatos de comentários nas células
- Alterar o nome do autor de todos os comentários
- Listar todos os comentários num Nova planilha ou livro
- Mostrar ou ocultar todos os comentários e respetivos indicadores no Excel
- Converter conteúdos das células em comentários no Excel
- Converter comentários em conteúdos das células no Excel
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos