excel利用vba代碼查找指定數據並刪除數據所在行。只要運用在需要在大量數據的表格中,查找指定的數據,然后刪除掉這個數據所在的行(或者刪除列)。手動刪除效率底下,篩選利用定位功能來刪除也很麻煩。現在給大家用個代碼。相信能給很多人帶來方便。
方法/步驟
-
找到開發工具,(圖為2007office,可能不同版本名稱不一樣,但是都有這個VB工具!)
-
見上圖,可以插入個形狀圖案,然后,點擊圖案並右鍵,然后進入到了編程界面。最后錄入代碼。
-
代碼:
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列)。
三、"科員" 這個里邊,要查找的值需要英文狀態下輸入“”符號。中間寫的就是要查找的值,找到后,按照代碼的意思,就會刪除這個值所在行了。