Намерете и заменете текстове в документ на Word, горен и долен колонтитул

Обикновено функцията Find & Replace може да помогне за намиране и замяна на конкретен текст в основния, горния и долния колонтитул на документ на Word едновременно. Опитвали ли сте някога да намерите и замените текстове само в горния и долния колонтитул в документ на Word? Или да намерите и замените множество различни текстове едновременно в документ на Word или в множество документи? Този урок показва някои методи за постигането им.

Намерете и заменете същия текст в документ на Word с функцията за намиране и замяна
Намерете и заменете същия текст само в горния и долния колонтитул с кода на VBA
Намерете и заменете различни текстове едновременно с една страхотна функция

Намерете и заменете същия текст в документ на Word с функцията за намиране и замяна

Лесно е да използвате функцията за намиране и замяна в документа на Word.

1. Отворете документа, съдържащ думите, които искате да замените, натиснете Ctrl + H ключове едновременно, за да отворите Търсене и заместване диалогов прозорец.

2. В Търсене и заместване диалогов прозорец, под Сменете раздел, въведете стария текст и новия текст отделно в Намерете това, и Rзамествам с и след това щракнете върху Замести всички бутон. Вижте екранна снимка:

Забележка: Можете да кликнете върху Повече бутон, за да намерите повече опции за търсене, колкото ви е необходимо.

3. След това се появява диалогов прозорец, за да ви покаже колко замени са направени. Кликнете OK да свърша.

Намерете и заменете същия текст само в горния и долния колонтитул с кода на VBA

Ако искате само да намерите и замените в горния и долния колонтитул на документ, методът в този раздел може да ви помогне.

1. Отворете документа, който ще намерите и заменете текста в горния и долния колонтитул, натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. В Microsoft Visual Basic за приложения прозорец, кликнете Поставете > Модул, и след това копирайте кода на VBA по-долу в прозореца на модула.

VBA код: Намерете и заменете текст само в горния и долния колонтитул

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

Забележка: В кода, моля, заменете „Намерете текст в заглавката"И"Намерете текст в долния колонтитул” с текстовете, които искате да намерите в горния и долния колонтитул; и заменете „Намерих заглавен текст"А"Намерих текст в долния колонтитул” с новия текст в горния и долния колонтитул.

3. Натисни F5 ключ за изпълнение на кода. След това конкретните текстове в горния и долния колонтитул се заменят с нови текстове.

Намерете и заменете различни текстове едновременно с една страхотна функция

1. Стартирайте приложението Microsoft Word, щракнете Kutools плюс > Пакетно намиране и замяна.

2. В Пакетно намиране и замяна прозорец, трябва да направите следното.

• 2.1 щракнете върху бутон> Добавяне на файл or Добавяне на папка за да добавите документите, които трябва да намерите и замените текстове вътре.
  
• 2.2 Кликнете върху Добавяне на ред бутон за вмъкване на полетата за намиране и замяна. Ако искате да намерите и замените три различни текста едновременно, моля, създайте три реда.
• 2.3 Във всеки ред въведете съществуващите текстове, които ще замените с нов в Какво и след това въведете новия текст в Сменете колона.
• 2.4 Посочете Тип на търсене за всеки ред.
• 2.5 В Открий в изберете къде да приложите намирането и замяната. Включва Основен документ, Header намлява Footer В тази секция. Можете да изберете един от тях, два от тях или всички въз основа на вашите нужди.
• 2.6. Щракнете върху Сменете бутон за стартиране на операцията. Вижте екранна снимка:

След това всички конкретни текстове се заменят в избраните документи.

Съвет: Можете да маркирате резултата с цвят на фона, като посочите определен цвят в колоната Highlight за ред.

  Ако искате да имате безплатен пробен период (60 дни) на тази помощна програма, моля, щракнете, за да го изтеглитеи след това преминете към прилагане на операцията съгласно горните стъпки.

Свързани статии

---

Препоръчани инструменти за производителност на Word

 

Kutools за Word - повече от 100 разширени функции за Microsoft Word, спестете 50% време

• Сложните и повтарящи се операции могат да се извършват еднократно за секунди.
• Вмъкнете няколко изображения в папки в документа на Word наведнъж.
• Обединете и комбинирайте множество файлове на Word в папки в един с желания от вас ред.
• Разделете текущия документ на отделни документи според заглавие 1, прекъсване на раздел или други критерии.
• Конвертиране на файлове между Doc и Docx, Docx и PDF, колекция от инструменти за общи преобразувания и избор, и така нататък...

Вижте повече Свали сега покупка