根据某列中的值删除单元格行答案

【问题标题】：Delete cell rows based on a value in a certain column根据某列中的值删除单元格行
【发布时间】：2016-03-27 05:05:11
【问题描述】：

我正在使用 Excel 10。我有一个包含多列数据的工作表（来自 A-D）。我想要一个宏，它可以删除 A 列中任何单元格的值为零 (0) 的所有行。我在其他列中有零，但不希望宏测试这些，即我只希望宏测试 A 列中的零。

我尝试了多个我在网上找到的代码版本，但它们删除了错误的行。

感谢任何帮助。

【问题讨论】：

如何使用 Excel 内置的“过滤器”工具而不是 VBA 宏？

标签： vba excel-2010

【解决方案1】：

这会让你开始：

Sub RowKiller()
    Dim N As Long, i As Long

    N = Cells(Rows.Count, "A").End(xlUp).Row
    For i = N To 1 Step -1
        If Cells(i, "A").Value = 0 Then Cells(i, "A").EntireRow.Delete
    Next i
End Sub

【讨论】：