Попытка получить рабочий фильтр для быстрого построения отчета - как видно здесь .
Мой код на данный момент выглядит так:
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, взятый из другого листа.
У меня было вроде как работать временно (это отфильтровывало бы по некоторым критериям, а не по другим), но я не знаю, что именно я сделал, чтобы заставить его работать, и почему он больше не работает!