Bonjour,

j'ai un fichier importé du Web contenant des champs dates formattés comme suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
                    TheCell.Offset(iOffsetL).NumberFormat = "mm/dd/yyyy"
Dans un autre feuille j'ai un cellule initialisée par Access avec la date limite pour le traitement.
Le champ date est exporté depuis Access comme suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
    'Date limite pour filtrage
    .Sheets(2).Range("A3") = tabls(4)
J'ai besoin de faire un filtré élaboré sur un sélection >= à ma date.

Comment puis-je faire cela.
je n'obtiens aucun résultat.

Quand je laisse le champ limite de date comme sélection, j'obtiens bien les record pour cette valeur.

Donc ceci marche (mais ne correspond pas à ma demande
LevelTestAssignation_ExpireAt
2011-03-31
ceci ne marche pas mais est la formalisation de ce que je cherche.
LevelTestAssignation_ExpireAt
>=2011-03-31
le code que j'ai utilisé pour tester est tout simple.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
ub test()
    Sheets(1).Range("A1:BS925").AdvancedFilter _
        Action:=xlFilterCopy, CriteriaRange:=Sheets(2).Range("A3:A4") _
        , CopyToRange:=Range("A1"), Unique:=False
End Sub
Comment combiner la date et >= ?