用循环替换IF

时间:2014-05-06 12:33:02

标签: vba excel-vba excel

我有一个带有大量值的电子表格和一个按钮。在代码按钮中我有 遵循VBA代码

If Range("N2").Value = "100" Then
Rows ("2:2").Select
Selection.Delete
 End if

这个想法是,如果在该行中放置100,那么该行将被删除。但是如果我有大量的行,这显然会出现问题,这将意味着加载" IFs" 我的问题是,有什么方法可以通过循环完成。所以我可以循环遍历所有行,如果满足条件,则该行将被删除。在上面的If语句中,我必须指定行选择了,那么循环如何做到这一点? 任何帮助非常感谢。 亲切的问候 Ĵ

1 个答案:

答案 0 :(得分:2)

Set范围并执行以下循环

For Each row In rng.Rows
  For Each cell in row.Cells
    'Do Something
  Next cell
Next row