excel如何用宏自动删除单元格为0的这一行 ，

Question

excel如何用宏自动删除单元格为0的这一行 ，还有 D这一列的值是从其它表格调过来的 函数是（ D1=‘订单！A1’） 谢谢大侠们 求教啊

Answer 1

ALT+F11,输入如下代码：

Sub mydel()
    Dim i As Long
    For i = Cells(Rows.Count, 1).End(3).Row To 3 Step -1
        If Range("d" & i) = 0 Then Rows(i).Delete
    Next i
End Sub

运行即可

Answer 2

Sub 删除0行()
For i = [d65536].End(3).Row To 3 Step -1
    If Cells(i, 4) = 0 Then Rows(i & ":" & i).Delete Shift:=xlUp
Next
End Sub

本回答被提问者采纳