如何在excel中批量删除数据

Question

在表一中有我们需要的数据的名称，那怎么批量删除表2中的数据只留下表一中名称的数据？

Answer 1

在excel中批量删除数据的方法如下：
1、用 函数+筛选 进行删除
假设你的数据分为A、B两列，A列是名称，B列是数据
2、在表2中的C列输入以下公式并下拉
=IF(COUNTIF(Sheet1!A:A,A1)>0,"保留","删除")
3、然后对C列进行筛选，将标有“删除”的筛选出来并删除即可。
当然，如果数据很多，并且要多次重复操作，可以编写一个VBA程序来操作，这样更方便。

Answer 2

这个问题可用VBA来解：

例如：

 

可用如下VBA程序批量删除表二中的数据只留下表一中名称的数据

Sub 批量删除()

Dim i As Integer

For i = 3 To 15

  If Range("A3:A9").Find(Range("C" & i).Value, , , xlWhole) Is Nothing Then

    Range("D" & i).ClearContents

  End If

Next i

End Sub