Question

VBA中使用通配符

If Range("c" & i) = *th* Then 变量的左右两边可以加通配符吗？

Answer 1

可以参考下面的代码：

rg=[a1].currentregion

for a=1 to ubound(rg)

if rg(a,1) like "*牛肉*" then rg(a,2)=”过期”

next

for each a in cells

if a.value like "*牛肉*" then offset(a,0,1).value="过期"

next

扩展资料：

通配符元素优先级规则

1、精确字符 a, \*, \\

2、字符范围 [Aa], [[:digit:]]

3、任意字符 ?

4、重复的精确字符 a+

5、重复的字符范围 [Aa]+, [[:digit:]]+

6、重复的任意字符 ?+

7、任意字符串 *

参考资料来源：百度百科-通配符

Answer 2

Excel 2016 怎么使用通配符查找数据

Answer 3

可以用If instr(Range("c" & i),"th")>0 Then

Answer 4

可以用运算符
If Range("c" & i) Like "*th*" Then MsgBox ""