vba Заменить все на листе с помощью подстановочных знаков

Добрый день:

Мне еще раз ;). Перейдите в другой вопрос, пытающийся заменить все элементы в столбце. Кажется, я не могу получить подстановочные знаки для работы с тем, как я вызываю оператор replace. Может, кто-то может показать мне ошибку на моих дорогах? Спасибо.

Код:

Worksheets(1).Columns("B").Replace _ What:="testName", Replacement:="realName", _ SearchOrder:=xlByColumns, MatchCase:=false 

Теперь это работает идеально, пока мои данные выглядят так:

 testname testName testNaMe 

НО, если мои данные выглядят так:

 teestName TTestname teesstname 

Это, очевидно, не удается. Есть ли способ использовать подстановочные знаки с тем, как я реализую свой поиск, чтобы я мог просто искать «имя»? * Персонаж, похоже, не работает, так как я бы подумал, что он должен (в основном, bash). Спасибо.

Если вы пытаетесь найти «testName» в любом месте ячейки, добавьте * wildcard в обе стороны:

 Worksheets(1).Columns("B").Replace What:="*testName*", Replacement:="realName", SearchOrder:=xlByColumns, MatchCase:=false 

И, конечно же, вы можете использовать ="testName*" или ="*testName" для соответствия ="*testName" или завершать (соответственно) с помощью "testName".

Давайте будем гением компьютера.