Как отфильтровать столбец даты, используя VBA по 2 критериям?

Question

У меня есть столбец в таблице, который содержит пробелы и даты.Как мне кодировать в VBA возможность исключать пробелы и даты в будущем?

Answer 1

Это должно отфильтровать пробелы и будущие даты.

Обратите внимание, что он будет фильтровать только те столбцы, которые вы указали как Field (на основе номера столбца), поэтому, если вы хотите скрыть все пробелы вместо пробелов только одного столбца, вы можете повторить этовыровняйте и отрегулируйте при необходимости (или используйте петлю).

Sub FilterBlankAndDates()

    With sheets("Sheet1").ListObjects("Table1").Range
        .AutoFilter Field:=1, Criteria1:="<>"
        .AutoFilter Field:=2, Criteria1:="<=" & Date
    End With

End Sub