Discussion :

[jena-s72]

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.

[Menhir]

As-tu testé tout simplement en utilisant le format anglais ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim DateC As Date
dateR = "01/13/2020"
ActiveSheet.Range("A1").AutoFilter Field:=1, Operator:=xlFilterValues, Criteria2:=Array(2, DateC)

VBA est farouchement anglophone contrairement à Excel qui s'adapte plutôt bien au français.

Est-il normal que tu déclares une variable nommée DateC, que tu renseignes une variable date nommée dateR et que tu utilises dans le filtre une variable nommée DateC ???
Ne manquerait-il pas un petit "Option Explicit" en début de code ?