[算表] 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