Question

如何使用宏删除EXCEL表中的指定行

如下图

如果表中某行的E列不含有“数据”这两个字或者该行中G列（验证）的内容是FLASE，就将该行删除。
这张表有很多这样的行，需要通过循环实现？宏应该如何写呢？

Answer 1

excel中的宏提示，不能去除，但是可以设置信任中心的宏设置，使得宏提醒不在出现。点击文件——选项——信任中心——宏设置，点击启用所有宏，确定以后，再打开带有宏的文件，将直接打开，不再提示。将宏设置为启用所有宏，要对文件加以筛选，以免造成宏中毒。

Answer 2

Sub delRow()
With Sheets(1)
    For i = .[C65536].End(xlUp).Row to 2 Step -1
        IF  Instr( .Cells( i , 5 ) , "数据" ) = 0 Or Not .Cells(i,7) Then .Rows( i ).Delete
    Next
End With
End Sub

Answer 3

Sub 删除行()
For i = 2 To [E65536].End(3).Row
If InStr(Range("E" & i), "数据") = 0 Or Not Range("G" & i) Then Range("E" & i).ClearContents
Next
Range("E:E").SpecialCells(4).EntireRow.Delete
End Sub