1.通配符的分類:
1.星號(*):表示任意多個字符(可以為0個)
2.問號(?):表示任意一個字符(必須為1個)
3.井號(#):表示任意一個數(shù)字(必須為1個)
4.感嘆號(!):邏輯非,表示不是,如[!0-9]表示非數(shù)字
5.方括號([]):表示一個范圍,如[A-Z a-z]表示全部字母
2.通配符的使用:
在VBA中,使用LIKE指示后面的搜索模式是利用通配符而不是直接相等匹配進行比較。
1)星號(*)的使用
1.找出以"VBA"開頭的記錄:(包括記錄"VBA")
sub test()
dim i as integer
for i =1 to 100
if range("a" & i) like "VBA*" then
range("a" & i) .interior.color=65535
endif
next
end sub
2)問號(?)的使用
2.找出以"V"開頭,7個字符、第5位是“B”的記錄。
Sub test()
Dim i As Integer
For i = 1 To 100
If Range("a" & i) Like "V???B??" Then
Range("a" & i).Interior.Color = 65535
End If
Next
End Sub
3)方括號[]的使用
3.找出第一位以"A-H"開頭的記錄。
Sub test()
Dim i As Integer
For i = 1 To 100
If Range("a" & i) Like "[A-H]*" Then
Range("a" & i).Interior.Color = 65535
End If
Next
End Sub
4)井號(#)的使用
4.找出前兩位以數(shù)字開頭,8個字符的記錄。
Sub test()
Dim i As Integer
For i = 1 To 100
If Range("a" & i) Like "##??????" Then
Range("a" & i).Interior.Color = 65535
End If
Next
End Sub
5)邏輯非(!)的使用
5.找出第一位以數(shù)字開頭 第三位不是數(shù)字的記錄。
Sub test()
Dim i As Integer
For i = 1 To 100
If Range("a" & i) Like "#?[!0-9]*" Then
Range("a" & i).Interior.Color = 65535
End If
Next
End Sub