小编Joh*_*n A的帖子

我在VBA中编写了一个小脚本,它根据列表检查给定范围内的单元格的值.如果单元格值与列表中的值匹配则保留,否则将删除.我想知道如何让它向后运行,因为向前运行会产生问题.我已经对此进行了一些研究,并且我尝试将"Step -1"附加到开始for循环的行的末尾,但是在这种情况下这不起作用.

Set Rng = Range("A9:V9")
For Each cell In Rng
    If Not myList.Exists(cell.Value) Then
        cell.EntireColumn.Delete
    End If
Next