Выражение для проверки одного или нескольких пробелов в VBA для поиска совпадений в ячейках Excel

Question

Я пытаюсь использовать регулярные выражения в макросе для документа Excel.

Вот то, что у меня есть:

dim regex
regex.pattern = "\s+"
for p = 3 to totalparamcount
    if (regex.test(Worksheets("table").Cells(p,1)) then
        msgbox ("blah blah")
    end if
next

Шаблон, который я пытаюсь найти, состоит из одного или нескольких пробелов, табуляции, новых строк, которые я видел, обозначается "\s".

Строка 'if (regex.test(Worksheets("table").Cells(p,1)) then' получает эту ошибку:

Run-time error '424':

Object required

Я использую VBA 7.0 в Excel.

Answer 1

Вам необходимо создать объект регулярного выражения, т.е.

Dim regex
Set regex = CreateObject("vbscript.regexp")
regex.Pattern = "\s+"