bonjour,
je cherche à faire un filtre par macro sur un fichier comportant une colonne au format date.
lorsque j'utilise l'enregistreur de macro je m'aperçois que la date est en anglais dans le code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
ActiveSheet.Range("$A$1:$R$71").AutoFilter Field:=1, Operator:= _
        xlFilterValues, Criteria2:=Array(2, "1/13/2020")
si je remplace la date par la variable au format date :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim DateC As Date
dateR = "13/01/2020"
    ActiveSheet.Range("A1").AutoFilter Field:=1, Operator:= _
        xlFilterValues, Criteria2:=Array(2, DateC)
aucune case n'est coché dans le filtre.

merci de votre aide.