Microsoft 365 Macro filtre pour sélectionner les dates portant sur les 2 mois à venir à partir de la date du jour

Bonjour
j'ai, crée une macro qui filtre les dates de deux mois supérieures à la date du jour
Range("i3").AutoFilter Field:=9, Criteria1:=">=" & Month(Date) & "/1/" & Year(Date), Operator:=xlAnd, Criteria2:="<" & Month(Date) + 2 & "/1/" & Year(Date) + Int(Month(Date) / 12)
ce filtre fonctionnait correctement jusqu'à présent mais je pense qu'avec le proche passage à 2022 ca bug....
merci de votre aide
Michel