模糊匹配关键字删除整行

hcm19522 · 发表于 2018-7-4 16:48

C2:C9 (資料多設輔助){=IF(OR(ISNUMBER(0/(FIND(E$2:E$5,"@"&B2)-1))),"","V")

G2:G9{=INDEX(B:B,SMALL(IF(C$2:C$9="V",ROW(C$2:C$9),4^8),ROW(A1)))&""

H2:H9{=INDEX(B:B,SMALL(IF(MMULT(ISNUMBER(0/(FIND(TRANSPOSE(E$2:E$5),"@"&B$2:B$9)-1))*1,Z1:Z4+1)=0,ROW(B$2:B$9),4^8),ROW(A1)))&""

abccba_ln · 发表于 2018-7-5 16:35

=SUM(IF(ISERR(FIND(关键字!$A$2:$A$57,汇总!B4)),0,1))

复制代码

新建一列，输入上面公式，数组公式三键结束，下拉，然后筛选大于0的行删除就好。

zhangcheng6688 · 发表于 2018-7-8 13:13

lsc900707 发表于 2018-7-4 13:47

这段代码我直接运行，会导致整个EXCEL文件都自动关闭，我把brr(1 To 500000, 1 To 63)，500000行数改小之后就可以正常运行vba了，具体原因我也不是很清楚，是我内存太小了？

		自动登录	找回密码
密码			免费注册

[求助] 模糊匹配关键字删除整行