[算表] VBA搜尋字串中所有符合條件位置及值

作者: genow   2019-06-23 12:47:26
軟體:EXCEL
版本:2010
您好
我的問題是想從甲字串第1行的字串
去搜尋乙字串第1行中相同內容的位置
然後紀錄對應乙字串第2行的內容
所以以下表為例,輸出的結果會是黃色的結果
甲字串(1欄) 乙字串2(2欄)
(第1行) (第1行) (第2行)
AAA AAA aaa
BBB GGG ggg
CCC AAA aaa
DDD FFF fff
... AAA aaa
... PPP ppp
... ... ...
... ...
我的作法是
1、先分析甲字串陣列大小
2、然後用迴圈從甲字串第1筆資料開始用match指令找出乙字串對應位置
3、再利用index找出乙字串第2行對應內容
我遇到的問題是,只會找到乙字串符合條件的第1筆位置就停止了
無法搜尋所有符合條件的位置
我有想到解決的方式,是利用另一個迴圈加上判斷式
當找出第1筆後,就從它的位置N,下一個位置N+1再做一次
直到乙字串所有位置跑完
但是感覺這樣做很不程式XDDD
請問是否有適當的指令可以完成呢 謝謝
作者: soyoso (我是耀宗)   2019-06-23 13:04:00
巢狀迴圈,外圈甲字串範圍內,內圈判斷是否乙字串第一欄是否符合甲字串,符合抓出乙字串範圍第二欄的值內圈也可用range.find來搜尋甲字串的儲存格range.offset來取出第二欄的值或迴圈於甲字串範圍,以range.autofilter篩選方式
作者: genow   2019-06-23 13:26:00
感謝 沒有想過這樣做 謝謝!

Links booklink

Contact Us: admin [ a t ] ucptt.com