The following code filters a range of dates by the dates in August
ActiveSheet.Range("$A$29:$CG$3582").AutoFilter field:=18, Criteria1:= _
xlFilterAllDatesInPeriodAugust, Operator:=xlFilterDynamic
How do I make this code dynamic so that I can filter the range by any month (e.g. month(today()))?