excel表格中如何大量查找数据并删除该行
发布网友
发布时间：2022-04-21 19:48
共2个回答
热心网友
时间：2022-05-16 19:04
打开查找对话框，输入需要查找的内容，点查找全部，然后按CTRL+A在查找对话框中全选。
然关闭查找对话框，在任何一个已选中的数据上单击右键--删除--整行
热心网友
时间：2022-05-16 19:04
假设是要查找A列包含XXX的，查到后将该行删除
sub
test()
Dim
i&,r&
r=cells(rows.count,1).end(xlup).row
'定位A列最后一行
for
i=r
to
1
step
-1
'从最后一行循环至第一行，倒过来循环是为了保证删除行时不会跳过行，从而造成漏行
if
instr(cells(i,1),"XXX")>0
then
'如果A列第i行单元中包含XXX，则执行删除整行操作
range("A"
&
i).EntireRow.delete
‘删除第i行
end
if
next
end
sub
