VBA отфильтровывает даты менее 30

Question

Кто-нибудь знает код vba, который фильтрует все данные старше 30 дней в Excel?Это означает, что он будет отображать предметы старше 30 дней.Довольно стандартный набор данных.Колонка имен, времени и дат записи.Я просто хочу открыть рабочую книгу и отфильтровать любого, кому меньше 30 дней.Заранее спасибо!

Answer 1

Dim sht As Worksheet
Set sht = Worksheets("Sheet1")

With sht.Range("A1").CurrentRegion
    .AutoFilter
    .AutoFilter Field:=1, Criteria1:="<" & CLng(Date - 30)
End With