excel利用vba代码查找指定数据并删除数据所在行

excel利用vba代码查找指定数据并删除数据所在行。只要运用在需要在大量数据的表格中，查找指定的数据，然后删除掉这个数据所在的行（或者删除列）。手动删除效率底下，筛选利用定位功能来删除也很麻烦。现在给大家用个代码。相信能给很多人带来方便。

工具/原料

 

• office或者WPS，关键是必须要有visual basic编程功能！
• visual basic（集成在wps或office中的）

方法/步骤

 

1. 1

   找到开发工具，（图为2007office，可能不同版本名称不一样，但是都有这个VB工具！）

   
2. 2

   见上图，可以插入个形状图案，然后，点击图案并右键，然后进入到了编程界面。最后录入代码。

   
3. 3

   代码：

   Sub 椭圆2_Click()

   Dim i As Long

   For i = 1 To Cells(Rows.Count, 4).End(xlUp).Row

   If Cells(i, 4) = "科员" Then

   Rows(i).Delete

   End If

   Next

   End Sub

   注意：一、’“”椭圆2“”这个是由于我选择的形状是椭圆，因此VB自动取名椭圆2。Sub 椭圆2_Click()  。这一串代码一般可以删除，末尾 end sub 也可以删除

   二、Cells(i, 4) 这个里边，i是代表行，4代表第四列（即D列）。

   三、"科员"  这个里边，要查找的值需要英文状态下输入“”符号。中间写的就是要查找的值，找到后，按照代码的意思，就会删除这个值所在行了。