EXCEL VBA 怎样删除某一列符合某个条件的行

Question

如题所述

Answer 1

比如删除D列空白的行

Sub S()
    Dim c%, i%
    c = Cells(Rows.Count, 4).End(3).Row
    For i = c To 1 Step -1
        If Cells(i, 4) = "" Then Rows(i).Delete
    Next
End Sub

Answer 2

删除第3行，可以用语句：
rows(3).delete