Localizar e Substituir textos no corpo, cabeçalhos e rodapés do Word

Normalmente, a função Localizar e Substituir permite procurar e substituir texto específico no corpo, no cabeçalho e no rodapé de um documento do Word em simultâneo. Já alguma vez tentou localizar e substituir texto apenas nas secções de cabeçalho e rodapé de um documento do Word? Ou localizar e substituir vários textos diferentes ao mesmo tempo num único documento ou em vários documentos? Este tutorial apresenta alguns métodos para alcançar esses objetivos.

Localizar e Substituir o mesmo texto num documento do Word com a funcionalidade Localizar e Substituir
Localizar e Substituir o mesmo texto apenas na secção de cabeçalho e rodapé com código VBA
Localizar e Substituir textos diferentes em simultâneo com uma funcionalidade extraordinária

---

Localizar e Substituir o mesmo texto num documento do Word com a funcionalidade Localizar e Substituir

É muito fácil usar a funcionalidade Localizar e Substituir num documento do Word.

1. Abra o documento que contém as palavras que pretende substituir e prima em simultâneo as teclas Ctrl+H para abrir a caixa de diálogo Localizar e Substituir.

2. Na caixa de diálogo Localizar e Substituir, no separador Substituir, introduza o texto antigo e o texto novo nas caixas Localizar e Substituir por, respetivamente, e clique no botão Substituir Tudo. Veja a captura de ecrã:

Nota: Pode clicar no botão Mais para encontrar mais opções de Opções de pesquisa conforme necessário.

3. Depois, surge uma caixa de diálogo a indicar quantas substituições foram efetuadas. Clique em OK para concluir.

---

Localizar e Substituir o mesmo texto apenas na secção de cabeçalho e rodapé com código VBA

Se pretender apenas Localizar e Substituir no cabeçalho e rodapé de um documento, o método nesta secção pode ajudar.

1. Abra o documento em que irá localizar e substituir texto no cabeçalho e rodapé e prima as teclas Alt+F11 para abrir a janela do Microsoft Visual Basic para Aplicações.

2. Na janela do Microsoft Visual Basic para Aplicações, clique em Inserir > Módulo e copie o seguinte código VBA para a janela do módulo.

Código VBA: Localizar e Substituir texto apenas em cabeçalho e rodapé

Sub FindAndReplaceOfHeaderAndFooter()
'Update by Extendoffice 20190805
    Dim xDoc As Document
    Dim xSelection As Selection
    Dim xSec As Section
    Dim xHeader As HeaderFooter
Dim xFooter As HeaderFooter
On Error Resume Next
    Set xDoc = Application.ActiveDocument
    For Each xSec In xDoc.Sections
        For Each xHeader In xSec.Headers
            xHeader.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found header text" 'Enter the old header text here!
               .Replacement.Text = "I've found header text" 'Enter the new header text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xHeader
        For Each xFooter In xSec.Footers
            xFooter.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found footer text" 'Enter the old footer text here!
                .Replacement.Text = "I've found footer text" 'Enter the old footer text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xFooter
    Next xSec
    xDoc.ActiveWindow.ActivePane.Close
    If xDoc.ActiveWindow.View.SplitSpecial = wdPaneNone Then
        xDoc.ActiveWindow.View.Type = wdPrintView
    Else
        xDoc.ActiveWindow.View.Type = wdPrintView
    End If
    xDoc.Activate
End Sub

Nota: No código, substitua «Localizar texto do cabeçalho» e «Localizar texto do rodapé» pelos textos que pretende encontrar no cabeçalho e no rodapé; e substitua «Encontrei texto do cabeçalho» e «Encontrei texto do rodapé» pelos novos textos do cabeçalho e do rodapé.

3. Prima a tecla F5 para executar o código. Assim, os textos específicos no cabeçalho e no rodapé são substituídos por Texto Novo.

---

Localizar e Substituir textos diferentes em simultâneo com uma funcionalidade extraordinária

1. Inicie a aplicação Microsoft Word e clique em KUTOOLS PLUS > Localizar e Substituir em Lote.

2. Na janela Localizar e Substituir em Lote, siga os passos seguintes.

• 2,1 Clique no botão Adicionar Arquivo ou Adicionar Pasta para adicionar os documentos nos quais pretende localizar e substituir textos.
  
• 2,2 Clique no botão Adicionar Linha para inserir os campos Localizar e Substituir. Se pretender localizar e substituir três textos diferentes em simultâneo, crie três linhas.
• 2,3 Em cada linha, introduza o texto existente que pretende substituir na coluna Localizar e, de seguida, introduza o novo texto na coluna Substituir.
• 2,4 Especifique o Tipo de Pesquisa para cada linha.
• 2,5 Na coluna Localizar em, escolha onde aplicar o Localizar e Substituir. Inclui Documento principal, Cabeçalho e Rodapé nesta secção. Pode selecionar uma, duas ou todas estas opções, consoante as suas necessidades.
• 2,6. Clique no botão Substituir para iniciar a operação. Veja a captura de ecrã:

Assim, todos os textos específicos são substituídos nos documentos selecionados.

Dica: Pode destacar o resultado com uma cor de fundo ao especificar uma determinada cor na coluna Destacar para uma linha.

---

Artigos relacionados