根据3个单元格的值删除行

Question

我对VBA相当新，所以我想做的事几乎不可能。

我有一张excel表，上面有三列显示剩余碳粉的百分比。

Black   Cyan    Magenta Yellow
6       45      67      100
93      93      5       19
20      40      65      57

我想知道是否可以创建一个宏来查看每行的所有三列，如果所有值都高于10，则删除该行，如果3个值中的任何一个低于10保留行并继续前进到下一行。

在这种情况下，将保留第2行和第3行，因为其值低于10但第4行将被删除。

Answer 1

For i = Sheet.Cells(Rows.Count, "A").End(xlUp).Row to 2 Step -1
    If Cells(i, Column1).Value2 > 10 And Cells(i, Column2).Value2 > 10 And Cells(i, Column3).Value2 > 10 Then
        Rows(i).Delete
    End If
Next i