Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Plage de date filtre avancé

Doze3

XLDnaute Nouveau
Bonjour à tous,

Je cherche a faire un filtre avancé sur une plage de date choisi par l'utilisateur. J'ai donc deux critère, un debut de plage et une fin de plage mais je ne sais pas pourquoi la macro ne prend en compte que le premier critère. Quelqu'un pourrait il m'éclairer ?

VB:
Sub MouvementSemaine2()
Dim datedebut, datefin, adresse, nomFichier As String, rgDonnee, rgCritere, rgDestination As Range
datedebut = InputBox("date de debut")
datefin = InputBox("date de fin")
ThisWorkbook.Sheets("mouvement").Range("d2") = ">=" & DateValue(datedebut)
ThisWorkbook.Sheets("mouvement").Range("e2") = "<=" & DateValue(datefin)
Set rgDonnees = ThisWorkbook.Worksheets("mars").Range("A1").CurrentRegion
Set rgCritere = ThisWorkbook.Worksheets("mouvement").Range("d1:e2")
Set rgDestination = ThisWorkbook.Worksheets("mouvement").Range("a1:b1")
rgDonnees.AdvancedFilter xlFilterCopy, rgCritere, rgDestination


End Sub
 
Dernière édition:

Discussions similaires

Réponses
2
Affichages
120
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…