Question

尝试使用工作过滤器来快速构建报告 - 如here所示。

我的代码目前是这样的：

Option Explicit
Sub GetData()

'Clear data field

    Sheets("Filter").Select
    Range("B10").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Clear

'Advanced Filter code

    Sheets("RawData").Range("JobRegister[#All]").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
        Sheets("RawData").Range("W1:AA2"), CopyToRange:=Sheets("Filter").Range("B10:T10"), Unique:=True



    Range("B10").Select

End Sub

它只返回列标题而没有结果，无论我用什么作为标准。

我的条件过滤器如下所示：

=IF(Filter!C4="Any","",Filter!C4)

其中C4包含从另一张纸张中绘制的DV列表。

我暂时有这样的工作（它会过滤某些标准，而不是其他标准），但我不知道我做了什么让它发挥作用，也不知道为什么它不再工作！

Answer 1

如果代码只返回标题，则表示您遇到其中一个问题。

根据Sheets("RawData").Range("W1:AA2")范围内设置的条件，您没有任何匹配数据。手动检查数据集中的那些条件，看看是否找到任何匹配的行。
如果您找到一些匹配的行，那么您在工作表W1:AA1的{{1}}范围内放置的标题一定存在问题。 条件范围中的标题必须与数据集中的标题完全相同。检查任何前导或尾随空格。

已编辑的代码：

这是编辑过的代码。请试一试......

RawData

Excel高级过滤器不返回任何数据

1 个答案: