Знайдіть і замініть тексти в основному тексті, верхніх і нижніх колонтитулах Word

Зазвичай функція Знайти та замінити може допомогти одночасно знаходити та замінювати певний текст у тілі, верхньому та нижньому колонтитулі документа Word. Ви коли-небудь пробували знаходити та замінювати тексти лише в розділі верхнього та нижнього колонтитулів у документі Word? Або знайти і замінити кілька різних текстів одночасно в документі Word або в декількох документах? Цей підручник показує деякі методи їх досягнення.

Знайдіть і замініть той самий текст у документі Word функцією Знайти та замінити
Знайдіть і замініть той самий текст лише у верхньому та нижньому колонтитулах кодом VBA
Знайдіть і замініть різні тексти одночасно чудовою функцією

Знайдіть і замініть той самий текст у документі Word функцією Знайти та замінити

У документі Word легко використовувати функцію Знайти та замінити.

1. Відкрийте документ, що містить слова, які ви хочете замінити, натисніть Ctrl + H клавіші одночасно, щоб відкрити Знайти і замінити діалогове вікно.

2 В Знайти і замінити у діалоговому вікні під заміщати , введіть старий і новий текст окремо у вікно Знайти те, що і Replace з , а потім клацніть на замінити всі кнопку. Дивіться знімок екрана:

Примітка: Ви можете натиснути кнопку більше , щоб знайти більше варіантів пошуку, як вам потрібно.

3. Потім з’явиться діалогове вікно, яке покаже, скільки було замінено. Клацніть OK закінчувати.

Знайдіть і замініть той самий текст лише у верхньому та нижньому колонтитулах кодом VBA

Якщо ви хочете знайти та замінити лише у верхньому та нижньому колонтитулі документа, метод у цьому розділі може допомогти.

1. Відкрийте документ, який ви знайдете, і замініть текст у верхньому та нижньому колонтитулі, натисніть інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модуль а потім скопіюйте наведений нижче код 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 Plus > Пакетний пошук та заміна.

2 В Пакетний пошук та заміна вікно, потрібно зробити наступне.

• 2.1 клацніть на кнопка> Додати файл or Додати папку додати документи, які вам потрібні, щоб знайти та замінити тексти всередині.
  
• 2.2 Натисніть кнопку Додати рядок , щоб вставити поля пошуку та заміни. Якщо ви хочете знайти та замінити три різні тексти одночасно, створіть три рядки.
• 2.3 У кожному рядку введіть наявні тексти, які ви заміните на нові, у знайти а потім введіть новий текст у заміщати колонка.
• 2.4 Вкажіть Тип пошуку для кожного ряду.
• 2.5 У Знайти в оберіть, де застосувати знахідку та замінити. Це включає Основний документ, Header та Нижній колонтитул у цьому розділі. Ви можете вибрати одного з них, двох з них або всіх з урахуванням ваших потреб.
• 2.6. Натисніть заміщати , щоб розпочати операцію. Дивіться знімок екрана:

Потім усі конкретні тексти замінюються у вибраних документах.

Порада: Ви можете виділити результат кольором тла, вказавши певний колір у стовпці «Виділення» для рядка.

Статті по темі

Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Особливості штучного інтелекту Kutools: Створення вмісту / Переписати текст / Питання та відповіді на документи / Отримайте швидкі відповіді / Перекласти документи / Польський документ (збережений формат)...

📘 Майстерність документів: Розділити сторінки / Об’єднати документи / Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...) / Пакетне перетворення в PDF...

✏ Редагування змісту: Пакетний пошук і заміна в кількох файлах / Змінити розмір усіх зображень / Транспонування рядків і стовпців таблиці / Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори / Розбиття розділів / Текстові поля / Гіперпосилання / Щоб отримати додаткові інструменти для видалення, перейдіть до Видалення група ...

➕ Творчі вставки: Вставити Роздільники тисяч / Прапорці / радіо кнопки / QR-код / Штрих-код / Кілька зображень / Дізнайтеся більше в Insert група ...

???? Точність вибору: Точне визначення Конкретні сторінки / таблиці / форми / Заголовок абзаців / Покращте навігацію за допомогою більше Select риси...

⭐ Покращення зірок: Перейдіть до будь-якого місця / Автоматичне вставлення повторюваного тексту / Перемикання між вікнами документів / 11 Перетворення Tools...

👉 Хочете спробувати ці функції? Завантажте Kutools для Word зараз! ????

Безкоштовне завантаження     Купити зараз     Дізнайтеся більше про Kutools для Word

 

Найкращі інструменти продуктивності офісу

Kutools для Word - 100+ інструментів для Word

• 🤖 Особливості штучного інтелекту Kutools: Генеруйте , Переписати, Підсумувати, перевести документи / Отримайте швидкі відповіді / Польський документ (збережений формат)
• 📘 Майстерність документів: Розділити сторінки / Об’єднати документи / Пакетне перетворення в PDF
• ✏ Редагування змісту: Пакетний пошук та заміна / Змінити розмір усіх зображень
• 🧹 Очищення без зусиль: Видаліть зайві пробіли / Видаліть розриви розділів
• ➕ Творчі вставки: Вставте роздільники тисяч / Вставити прапорці / Створення QR-кодів

Безкоштовне завантаження Купити зараз Дізнайтеся більше про Kutools