Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 根据3个单元格的值删除行_Vba_Excel - Fatal编程技术网

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

Vba 根据3个单元格的值删除行,vba,excel,Vba,Excel,我是VBA的新手,所以我尝试做的几乎是不可能的 我有一张excel表格,有三列显示碳粉剩余的百分比 Black Cyan Magenta Yellow 6 45 67 100 93 93 5 19 20 40 65 57 我想知道是否可以创建一个宏来查看每行的所有三列,如果所有的值都大于10,则删除该行,如果这三个值中有任何一个小于10,则保留该行并移动到下一行 在这种情况下,第2行和第3行

我是VBA的新手,所以我尝试做的几乎是不可能的

我有一张excel表格,有三列显示碳粉剩余的百分比

Black   Cyan    Magenta Yellow
6       45      67      100
93      93      5       19
20      40      65      57
我想知道是否可以创建一个宏来查看每行的所有三列,如果所有的值都大于10,则删除该行,如果这三个值中有任何一个小于10,则保留该行并移动到下一行


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

到目前为止您尝试了什么?请提供您一直试图使用的有问题的VBA代码以及中所述的当前结果/问题。如果您只是想找一个开始的地方,你会想试试@tigeravatar,我的其他代码已经编译好了,这是我想添加的东西,但我不知道该从哪里开始。这就是不提供代码的原因。我目前正在查看您提供的链接。@Jerry我还没有创建代码,因为我不知道如何启动它。我想知道是否有可能采取这样的行动。目前我正在查看上面提供的“如果”链接。这几乎奏效了。我不知道“And”可以用来保持“If”的状态。但是,脚本也考虑小于10的空格。我会继续努力,在我这一方面找出答案。非常感谢!很抱歉给你添麻烦。
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