VBA like

VBA like

• 一般用于模糊查找定位到对象

• 可以使用通配符或列表来查找

1	?	单一字符
2	*	零个或多个字符
3	#	任何一个数字
4	[字符列表]	字符列表中的任何一个字符
5	[!字符列表]	不在字符列表中的任何一个字符

原始数据如下
ID	course	score
小明	English	50
小明	Chinese	6
小红	Chinese	70
小李	Math	99

1. ?查找带明字的ID

   Sub shishi()
   Dim i As Integer
   Range("d2:d5").ClearContents
   For i = 2 To Range("a65536").End(xlUp).Row
       If Range("a" & i) Like "?明" Then
           Range("d" & i) = "找到你啦"
       End If
   Next
   End Sub
   
   ID	course	score	MARK
   小明	English	50	找到你啦
   小明	Chinese	6	找到你啦
   小红	Chinese	70	
   小李	Math	99	
   
   

2. *查找带ese的课程

   Sub shishi()
   Dim i As Integer
   Range("d2:d5").ClearContents
   For i = 2 To Range("a65536").End(xlUp).Row
       If Range("b" & i) Like "*ese*" Then
           Range("d" & i) = "找到你啦"
       End If
   Next
   End Sub
   
   ID	course	score	MARK
   小明	English	50	
   小明	Chinese	6	找到你啦
   小红	Chinese	70	找到你啦
   小李	Math	99	
   
   

3. #查找以为数字

   Sub shishi()
   Dim i As Integer
   Range("d2:d5").ClearContents
   For i = 2 To Range("a65536").End(xlUp).Row
       If Range("c" & i) Like "#" Then
           Range("d" & i) = "找到你啦"
       End If
   Next
   End Sub
   
   ps.如果找两位数字,用##来寻找两位数字
   
   ID	course	score	MARK
   小明	English	50	
   小明	Chinese	6	找到你啦
   小红	Chinese	70	
   小李	Math	99	
   

4. []自定义一个字符的条件,查找含有大写E的课程

   Sub shishi()
   Dim i As Integer
   Range("d2:d5").ClearContents
   For i = 2 To Range("a65536").End(xlUp).Row
       If Range("B" & i) Like "*[E]*" Then
           Range("d" & i) = "找到你啦"
       End If
   Next
   End Sub
   
   ps.这里是区分大小写的,大写E可以找到English,小写e会找到Chinese
   
   ID	course	score	MARK
   小明	English	50	找到你啦
   小明	Chinese	6	
   小红	Chinese	70	
   小李	Math	99	
   
   

5. 查找不含某个字符的,查找不含[l]的课程

   Sub shishi()
   Dim i As Integer
   Range("d2:d5").ClearContents
   For i = 2 To Range("a65536").End(xlUp).Row
       If Not Range("B" & i) Like "*[l]*" Then
           Range("d" & i) = "找到你啦"
       End If
   Next
   End Sub
   
   ps.通过not比较方便
   
   ID	course	score	MARK
   小明	English	50	
   小明	Chinese	6	找到你啦
   小红	Chinese	70	找到你啦
   小李	Math	99	找到你啦
   

---

like 是区分大小写的