使用自动过滤功能处理案例

时间:2017-07-19 07:25:02

标签: excel vba excel-vba

我有一张表,我想过滤T和U列中的空白行。 我有一些事情需要考虑。

我很少丢失行,并在S列中将其表示为缺失。如果缺少这些行,我不希望将它们视为过滤条件。默认情况下,它们为空白。

另一种情况是,T列和U列中的任何一行都是空白的,必须进行过滤。如果两列都是空白,则还必须对其进行过滤。

我附上两张图片供参考。谁能建议我怎么做呢?我是VBA的初学者,任何领导都会有所帮助。

Sub FC()
Dim ws As Worksheet

Set ws = Sheets("FC")

With ws
.Range("A5:T1000").autofilter Field:=20, Criteria1:="=", Operator:=xlFilterValues
End With
End Sub

我尝试了上面的代码,它适用于T列。 如何包含多个条件?因为在我的情况下,由于缺少列S,我不需要考虑完整的行。对于我的T和U,空白或任何一个都是空白的,那么我需要对它们进行过滤。

pic 1

这就是我的工作表在开始时的样子。

pic 2

我想要一个代码,以这种方式,我想用空行过滤列T和S,列T和U中的任何行都是空白的, 然后我想过滤它们。

1 个答案:

答案 0 :(得分:2)

好的,这里是你如何使用帮助列实现自定义过滤。我们将Sub FC() With Sheets("FC").Range("Z5:Z100") .EntireColumn.Hidden = True ' <-- optional, to hide the temp column .Formula = "=AND(S5<>""Missing"",OR(ISBLANK(T5),ISBLANK(U5)))" .AutoFilter 1, True End With End Sub 列用于此任务。

0rc1