Як створити макрокод для пошуку та заміни тексту в Excel?

Зазвичай ми використовуємо вбудовану функцію пошуку та заміни для пошуку та заміни значень у Excel. Насправді ви можете знайти та замінити текст у Excel безпосередньо макрокодом. У цій статті ви дізнаєтеся, як створити макрокод для пошуку та заміни тексту в Excel.

Створіть макрокод для пошуку та заміни тексту в Excel

---

Створіть макрокод для пошуку та заміни тексту в Excel

Будь ласка, виконайте наступні дії, щоб створити макрокод для пошуку та заміни тексту в Excel.

1 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі. Потім скопіюйте нижче код VBA у вікно коду.

Код VBA: Створіть макрокод для пошуку та заміни тексту в Excel

Sub FindandReplaceText()
'Update by Extendoffice 2018/5/24
    Dim xFind As String
    Dim xRep As String
    Dim xRg As Range
    On Error Resume Next
    Set xRg =Cells
    xFind = Application.InputBox("word to search:", "Kutools for Excel", , , , , 2)
    xRep = Application.InputBox("word to replace:", "Kutools for Excel", , , , , 2)
    If xFind = "False" Or xRep = "False" Then Exit Sub
    xRg.Replace xFind, xRep, xlPart, xlByRows, False, False, False, False
End Sub

3 Натисніть кнопку F5 клавіша для запуску коду.

4. У першій Kutools для Excel діалогове вікно, введіть текст або значення, яке ви шукаєте, а потім натисніть OK кнопку. Дивіться знімок екрана:

5 У другому Kutools для Excel діалогове вікно, введіть текст або значення, яке ви заміните, і натисніть на OK кнопки.

Потім усі зазначені тексти негайно замінюються потрібним текстом.

примітки: Цей код застосовується до активного робочого аркуша.

---

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

• Як знайти та замінити всі порожні клітинки певним числом або текстом у Excel?
• Як замінити коми новими рядками (Alt + Enter) у клітинках Excel?
• Як знайти та замінити назви вкладки аркуша в Excel?
• Як знайти значення в комірці зі списком, відокремленим комами в Excel?
• Як знайти перетин двох списків стовпців у Excel?