使用“If”函数删除数据

Question

在 Excel 中，是否可以使用vlookup或if函数，如果数据为 0，则应删除该行？例如：

If cell B1=0 then DELETE cell b1, and if cell B1=1 then UNCHANGED

Answer 1

尝试宏主要的（）：

Sub MAIN()
   Dim rng As Range, v As Variant
   Set rng = Range("B1")
   v = 0
   Call RowKiller(rng, v)
End Sub

Sub RowKiller(r As Range, v As Variant)
   If r.Value = v Then
      r.EntireRow.Delete
   End If
End Sub