多个关键词批量删除

zhengchen007 · 发表于 2019-8-22 17:12

zopey 发表于 2019-8-22 16:47
第21行的
If InStr(ma, arr(i, 1)) Then d.Remove (ma): Exit For

太厉害了，果然可以，大神接受我的膝盖

dgenson · 发表于 2019-8-22 18:33

为什么我做出来的结果是286条

lsc900707 · 发表于 2019-8-23 06:52

zhengchen007 发表于 2019-8-22 17:11
我对阁下的景仰有如滔滔江水，连绵不绝，又如黄河泛滥，一发而不可收拾，听阁下一言，胜读十年寒窗，看古 ...

这种“言不由衷”的话少说了！

bestqxx001 · 发表于 2020-7-17 01:19

如果只是删除关键字，保留关键字所在行的其他内容，该怎么写代码？

renkangjizhen · 发表于 2020-7-17 08:16

利用表2建立字典：A列值作为键，空为值。然后在表1中A列循环，将键为表2内容的单元格值转为空，去掉空行即可

renkangjizhen · 发表于 2020-7-17 08:17

注意从下向上循环

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

[求助] 多个关键词批量删除