Visual Basic for Applications:
Видалення символів, що відповідають патерну

Як:

У VBA можна використовувати функцію Replace або регулярні вирази для видалення символів, які відповідають шаблону. Ось приклади обох методів:

Використання функції Replace

Функція Replace є простою для видалення конкретних символів або послідовностей.

Sub DeleteSpecificChars()
    Dim originalString As String
    originalString = "123-ABC-456-XYZ"
    
    ' Видалення дефісів
    Dim resultString As String
    resultString = Replace(originalString, "-", "")
    
    Debug.Print originalString ' До: 123-ABC-456-XYZ
    Debug.Print resultString ' Після: 123ABC456XYZ
End Sub

Використання регулярних виразів

Для більш складних шаблонів регулярні вирази пропонують потужну альтернативу.

Спочатку активуйте бібліотеку Microsoft VBScript Regular Expressions через Tools > References у редакторі Visual Basic.

Sub DeletePatternChars()
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")
    
    Dim strPattern As String
    strPattern = "\d" ' Шаблон для видалення усіх цифр
    
    With regEx
        .Global = True
        .IgnoreCase = True
        .Pattern = strPattern
    End With
    
    Dim originalString As String
    originalString = "Remove 123 and 456"
    
    ' Використання методу Replace для видалення співпадінь
    Dim resultString As String
    resultString = regEx.Replace(originalString, "")
    
    Debug.Print originalString ' До: Remove 123 and 456
    Debug.Print resultString ' Після: Remove  and 
End Sub

Поглиблено

Історично, шаблонне співставлення та маніпуляції з рядками у VBA були дещо обмежені, особливо порівняно з більш сучасними мовами програмування, які пропонують великі стандартні бібліотеки для цих завдань. Функція Replace є простою та ефективною для прямих замін, але не має гнучкості для більш складного шаблонного співставлення. Саме тут з’являються регулярні вирази (RegEx), надаючи значно багатший синтаксис для шаблонного співставлення та маніпуляцій з рядками. Однак, робота з RegEx у VBA вимагає додаткового налаштування, такого як активація довідкової бібліотеки Microsoft VBScript Regular Expressions, що може бути бар’єром для новіших користувачів.

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

Варто зауважити, що для тих, хто працює в середовищах або проектах, де критично важлива продуктивність, використання зовнішніх бібліотек або інтеграція з іншими мовами програмування може надати кращу продуктивність та більше можливостей. Однак для багатьох повсякденних завдань у VBA ці нативні методи залишаються практичним та доступним вибором.