如何自动删除包含值小于某个数字的单元格的行

时间:2014-11-17 12:06:57

标签: excel excel-vba vba

我想知道是否有人能用excel查询来帮助我:

我正试图找到一种方法来删除列“G”中包含小于1000的数字的所有行(数据从:G列,第20行开始)

据我所知,宏似乎是最有用的功能,但我是一个完全的业余爱好者

对此的任何帮助都将非常感激

由于

1 个答案:

答案 0 :(得分:0)

尝试一下:

Sub RowKiller()
    Dim N As Long, i As Long, rr As Range
    N = Cells(Rows.Count, "G").End(xlUp).Row
    For i = N To 20 Step -1
        Set rr = Cells(i, "G")
        If rr.Value < 1000 Then
            rr.EntireRow.Delete
        End If
    Next i
End Sub