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 через Инструменты > Ссылки в редакторе 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 = "Удалить 123 и 456"
    
    ' Использование метода Replace для удаления совпадений
    Dim resultString As String
    resultString = regEx.Replace(originalString, "")
    
    Debug.Print originalString ' До: Удалить 123 и 456
    Debug.Print resultString ' После: Удалить  и 
End Sub

Подробнее

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

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

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