Skip to main content

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

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

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 Office

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 (Preserva Formato) / Super Traduzir (Preserva Formato) / Redação por IA / Revisão por IA...

📘 Domínio de Documentos: 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 Vários Arquivos / Redimensionar Todas as Imagens / Transpor Linhas e Colunas da Tabela / Converter Tabela para Texto...

🧹 Limpeza Sem Esforço: Elimine 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 Precisas: Identifique Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...

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

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

Melhores Ferramentas de Produtividade para Office

Kutools para Word – 100+ Ferramentas para Word