一般采用倒序的方式:例如,将D列中为“否”的整行删除:
Sub test()
For i = Cells(RowsCount, 4)End(xltoup)Row To 1
If Range("D" & i) = "否" Then
Range("D" & i)EntireRowDelete
End If
Next
End Sub
说个例子:假设你要筛选的值为:1,2,3 最好放在一个单元格;
Dim x
x = "1,2,3"
ActiveSheetRange("$B$1:$B$8")AutoFilter Field:=1, Criteria1:=Split(x, ","), Operator:=xlFilterValues
当然也你可以填到条件这里面:
Criteria1:=Array("1", "2", "3")
以上就是关于excel 中使用vba实现列的筛选全部的内容,包括:excel 中使用vba实现列的筛选、vba执行筛选,需要筛选的值是多个单元格的值、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)