XL 2016 remplacer date par variable

[Dudesson]

bonjour le forum
bonjour à tous,
j'ai obtenu le code en commentaire via l'enregistreur et il fonctionne bien mais je cherche à remplacer les dates entre les crochets par des dates chargées dans les variables TD et TF qui donnent des dates mais sans les crochets (").
quelqu'un at'il une astuce pour contourner ce problème?
merci d'avance, là je cale....
Pedro.

Code :

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

1 2 3 4 5

.Range("A1" & ":Y" & h).AutoFilter Field:=1, Criteria1:=Array("=" _ ), Operator:=xlFilterValues, Criteria2:=Array(2, TD, 2, TF) '.Range("A1" & ":Y" & h).AutoFilter Field:=1, Criteria1:=Array("=" _ ), Operator:=xlFilterValues, Criteria2:=Array(2, "6/29/2020", 2, "6/29/2020")

 

[Dudu2]

Bonjour,
Les crochets sont plutôt des guillemets ou double-quotes qui délimitent des chaines de caractères.
Si tu reprends ces valeurs telles quelles qui sont des dates en format anglo-saxon, il faut déclarer:
Dim TD as string, TF as String
TD = "6/29/2020"
TF = "6/29/2020"

 

[Dudesson]

bonjour le forum,
bonjour @Dudu2, merci pour votre tuyau.
j'ai fait ceci et là ça fonctionne bien.

Début = Format(TD, "mm/dd/yyyy")
  Fin = Format(TF, "mm/dd/yyyy")

bien à vous.
Pedro.