Skip to main content

Como pesquisar e substituir em vários arquivos no Word?

Author: Amanda Li Last Modified: 2025-08-06

Se você tiver dezenas de arquivos do Word contendo o mesmo conteúdo (como cabeçalhos, rodapés ou texto específico) e precisar substituir esse conteúdo em todos os documentos, fazer isso manualmente pode ser tedioso. Este tutorial apresenta dois métodos para substituir rapidamente o mesmo ou diferentes conteúdos em vários documentos do Word de uma só vez.

Encontre e substitua textos em vários documentos do Word ao mesmo tempo com código VBA
Encontre e substitua facilmente diferentes textos em vários documentos ao mesmo tempo com o Kutools for Word

Encontre e substitua textos em vários documentos do Word ao mesmo tempo com código VBA

Este método mostra como usar o código VBA para pesquisar e substituir conteúdo em vários documentos simultaneamente.

  1. Pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
  2. Clique em "Inserir" > "Módulo", depois cole o seguinte código: 
    Sub CommandButton1_Click()
'Updated by Extendoffice 20180625
Dim xFileDialog As FileDialog, GetStr(1 To 100) As String
Dim xFindStr As String
Dim xReplaceStr As String
Dim xDoc As Document
On Error Resume Next
Set xFileDialog = Application.FileDialog(msoFileDialogFilePicker)
With xFileDialog
    .Filters.Clear
    .Filters.Add "All WORD File ", "*.docx", 1
    .AllowMultiSelect = True
    i = 1
    If .Show = -1 Then
        For Each stiSelectedItem In .SelectedItems
            GetStr(i) = stiSelectedItem
            i = i + 1
        Next
        i = i - 1
    End If
    Application.ScreenUpdating = False
    xFindStr = InputBox("Find what:", "Kutools for Word", xFindStr)
    xReplaceStr = InputBox("Replace with:", "Kutools for Word", xReplaceStr)
    For j = 1 To i Step 1
        Set xDoc = Documents.Open(FileName:=GetStr(j), Visible:=True)
        Windows(GetStr(j)).Activate
        Selection.Find.ClearFormatting
        Selection.Find.Replacement.ClearFormatting
        With Selection.Find
            .Text = xFindStr
            .Replacement.Text = xReplaceStr
            .Forward = True
            .Wrap = wdFindAsk
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchByte = True
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        ActiveDocument.Save
        ActiveWindow.Close
    Next
    Application.ScreenUpdating = True
End With
MsgBox "Operation end, please view", vbInformation
End Sub
  3. Pressione F5 para executar o código.
  4. Na janela Procurar, selecione os documentos que deseja processar e clique em "OK".
    Browse window
  5. Na caixa de entrada "Localizar o que", digite a palavra ou frase que deseja encontrar e clique em "OK".
    Find what box
  6. Na caixa de entrada "Substituir por", insira o texto de substituição e clique em "OK".
    Replace with box
  7. Clique em "OK" na última caixa de diálogo do Microsoft Word.
    Confirmation dialog

Todas as instâncias do texto especificado nos arquivos do Word selecionados serão substituídas de uma só vez.

Encontre e substitua facilmente diferentes textos em vários documentos ao mesmo tempo com o Kutools for Word

O recurso "Substituição em Lote" no Kutools for Word permite pesquisar e substituir vários itens de texto em vários documentos do Word de uma só vez.

Kutools para Word,equipado com IA 🤖, oferece mais de 100 recursos práticos para simplificar suas tarefas.
  1. Clique em "Kutools" > "Substituição em Lote".
    Batch Replacement button
  2. No diálogo Substituição em Lote, configure as configurações:
    1. Clique no botão "Adicionar linha".
    2. Na nova linha:
      1. Digite o texto a ser encontrado em "Localizar".
      2. Digite o texto de substituição em "Substituir".
      3. Opcionalmente, especifique um tipo de pesquisa, local onde encontrar e substituir, cor de destaque e outras opções conforme necessário nas respectivas colunas.
    3. Clique no Add button botão na seção "Tipo de Arquivo" para adicionar arquivos do Word ao lote.
    4. Clique em "Substituir" ou "Localizar".
      Dica: Repita as etapas 1) e 2) para adicionar mais regras de localização e substituição.
      Batch Find and Replace configuration
  3. Feche o diálogo Substituição em Lote quando terminar.

Notas:

  • Se você clicar em "Localizar", as correspondências aparecerão na aba "Visualizar Resultado". Para aplicar substituições posteriormente, volte para a aba "Localizar e Substituir".
  • Se você clicar em "Substituir", todas as correspondências serão imediatamente substituídas e mostradas em "Visualizar Resultado".
  • Se cores de destaque foram especificadas, as substituições nos seus documentos do Word serão codificadas por cores de acordo.

Para mais informações sobre o recurso "Substituição em Lote", veja a página do tutorial.

Kutools para Word é o complemento definitivo para o Word que simplifica seu trabalho e aprimora suas habilidades de processamento de documentos. Adquira agora!

Melhores Ferramentas de Produtividade para Escritório

Kutools para Word – Eleve sua experiência no Word com mais de 100 recursos incríveis!

🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir (Preservar Formato) / Super Traduzir (Preservar Formato) / Redação por IA / Revisão por IA...

📘 Domínio do Documento: Dividir Páginas / Mesclar Documentos / Exportar Seleção em Diversos Formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...

✏ Edição de Conteúdo: Localizar e Substituir em Lote em Múltiplos Arquivos / Redimensionar Todas as Imagens / Transpor Linhas e Colunas da Tabela / Converter Tabela para Texto...

🧹 Limpeza Sem Esforço: Livre-se de Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de remoção, acesse o grupo Remover...

➕ Inserções Criativas: Inserir Separadores de Milhar / Caixas de Seleção / Botões de Rádio / QR Code / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...

🔍 Seleções de Precisão: Selecione Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos do Selecionar ...

⭐ Aprimoramentos Estrela: Navegue para Qualquer Localização / Insira Texto Repetitivo Automaticamente / Alterne Entre Janelas de Documento /11 Ferramentas de Conversão...

🌍 Suporte a mais de40 idiomas: Use o Kutools no seu idioma preferido – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e muitos outros!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Quer experimentar esses recursos? Baixe o Kutools para Word agora! 🚀
 

Melhores Ferramentas de Produtividade para Escritório

Kutools para Word – 100+ ferramentas para Word

Download Gratuito Comprar Agora Saiba Mais sobre o Kutools