Как можно найти звездочку в строке с помощью функции InStr?

Вопрос: Документация Microsoft указывает на использование "~*" для поиска "*" в строке. "~*" и "[*]" не работают. Выражение строковых выражений: "Balık yağı, balık unu, yaş meyve, kuru meyve, sucuk pastırma, nebati yağ, süt ve süt mamulleri imalatında kullanılan iktisadi kıymetler ve özel araç gereçler *" If InStr(1, WS.Cells(intRow, 6).Value, "~*", vbTextCompare) > 0 then 'Additional

Вопрос:

Документация Microsoft указывает на использование «~*» для поиска «*» в строке. «~*» и «[*]» не работают.

Выражение строковых выражений: “Balık yağı, balık unu, yaş meyve, kuru meyve, sucuk pastırma, nebati yağ, süt ve süt mamulleri imalatında kullanılan iktisadi kıymetler ve özel araç gereçler *”

If InStr(1, WS.Cells(intRow, 6).Value, «~*», vbTextCompare) > 0 then ‘Additional code here End If

Этот код не может найти символ звездочки.

Лучший ответ:

избавиться от ~ для * вам не нужно ничего особенного.

Sub testss() Dim str As String str = «test*name» ‘/ Returns 0 MsgBox InStr(1, str, «~*», vbTextCompare) ‘/ Returns 5 MsgBox InStr(1, str, «*», vbTextCompare) End Sub Ответ №1

~* используется для нахождения * в Range.Find и Range.Replace (то же самое в диалоговом Range.Replace Поиск и замена Excel”).

Вы также можете использовать InStrRev для поиска в обратном порядке, начиная с конца строки.

Оператор Like также может использоваться с [*] чтобы проверить, заканчивается ли строка *:

If WS.Cells(intRow, 6) Like «*[*]» Then

Оцените статью
Добавить комментарий