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

[genow ()]

軟體: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

請問是否有適當的指令可以完成呢 謝謝


--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.240.87.129 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1561265248.A.5EE.html
※ 編輯: genow (111.240.87.129 臺灣), 06/23/2019 12:49:33
→ soyoso: 巢狀迴圈，外圈甲字串範圍內，內圈判斷是否乙字串第一欄是
→ soyoso: 否符合甲字串，符合抓出乙字串範圍第二欄的值
→ soyoso: 內圈也可用range.find來搜尋甲字串的儲存格
→ soyoso: range.offset來取出第二欄的值
→ soyoso: 或迴圈於甲字串範圍，以range.autofilter篩選方式
→ genow: 感謝  沒有想過這樣做 謝謝!