特定の列の値に基づいてセルの行を削除します

Question

私はExcel 10で作業しています。私はいくつかのデータ列（A-Dから）を持つワークシートを持っています。私は、列Aの任意のセルの値がゼロ（0）であるすべての行を削除するマクロをしたいと思います。私は他の列にゼロを持っていますが、それらをテストするマクロを望んでいない、すなわち、列Aのゼロをテストしてください。

オンラインで見つかった複数のバージョンのコードを試しましたが、間違った行が削除されています。

何か助けていただければ幸いです。

Answer 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