VBA通配符,看這一篇就夠了!

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
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成,瀏覽時請結(jié)合常識與多方信息審慎甄別。
平臺聲明:文章內(nèi)容(如有圖片或視頻亦包括在內(nèi))由作者上傳并發(fā)布,文章內(nèi)容僅代表作者本人觀點,簡書系信息發(fā)布平臺,僅提供信息存儲服務(wù)。

相關(guān)閱讀更多精彩內(nèi)容

  • 1.1 VBA是什么 直到90年代早期,使應(yīng)用程序自動化還是充滿挑戰(zhàn)性的領(lǐng)域.對每個需要自動化的應(yīng)用程序,人們不得...
    浮浮塵塵閱讀 22,159評論 6 49
  • 官網(wǎng) 中文版本 好的網(wǎng)站 Content-type: text/htmlBASH Section: User ...
    不排版閱讀 4,737評論 0 5
  • 引子 思路:看到兩個序列去匹配的問題,最自然的想法是雙層循環(huán)嘗試對齊匹配,我們假設(shè)表格數(shù)字為1代表匹配成功,0代表...
    閆品品閱讀 1,302評論 1 1
  • 人真的是一種很奇妙的生物,有時候可能一種你并不是很需要的東西時時刻刻在你面前的時候,你不會感覺到你對他的需...
    唐宋一元明清閱讀 259評論 0 1
  • 到了某個年紀,愛情不再是生活的必須,而只是一個調(diào)味品。 昨天我的朋友很悲傷地說,“我要去相親了,我已經(jīng)無路可走了。...
    蘆葦_2019閱讀 277評論 0 3

友情鏈接更多精彩內(nèi)容