Filtre elaboré entre 2 dates

[Résolu/Fermé]
Signaler
Messages postés
6
Date d'inscription
vendredi 11 mars 2016
Statut
Membre
Dernière intervention
11 octobre 2016
-
Messages postés
1412
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
9 mars 2021
-
J'ai besoin d'un coup de main, j'essaye desesperement de lancer un filtre elaboré en VBA sur 2 dates, j'ai beau le triturer dans tous les sens en manuel ca marche, par VBA pas moyen . je dois louper quelque chose
Pourtant ca semble simple, 2 textbox pour les 2 dates et un bouton pour lancer le filtre
Private sub TextBox1_AfterUpdate()

[g2] = ">=" & CDate(Format(TextBox1.Value, "dd/mm/yyyy"))

End Sub


Private Sub TextBox2_AfterUpdate()
'
[H2] = "<" & CDate(Format(TextBox2.Value, "dd/mm/yyyy"))


End Sub
Private Sub CommandButton1_Click()

Range("feuil3!A4:C39").AdvancedFilter , Criteriarange:= _
Range("Feuil3!g1:h2"), Unique:=False
End Sub

1 réponse

Messages postés
1412
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
9 mars 2021
154
Bonjour Phileas, bonjour le forum,

Tu ne peux pas écrire Range("Feuil3!A4:C39"). La syntaxe n'est pas bonne. Il faut écrire : Sheets("Feuil3").Range("A4:C39")

Autre chose, il me semble que dans les filtres le format de date accepté est le format américain : yyyy/mm/dd...
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 41713 internautes nous ont dit merci ce mois-ci