salut
 
 
j ai un souci  de code sur tri automatique
 
-----------------------------
Sub recherchedateadate()
 On Error Resume Next
  Dim date1
  Dim date2
  date2 = Sheets("base" ).Range("h3" )
  date1 = Sheets("base" ).Range("h4" )
   
    Workbooks("decoupe.xls" ).Activate
    Sheets("enregistrement" ).Activate
     
    Range("B1" ).Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=2, Criteria1:="<=" + date2, Operator:=xlAnd _
        , Criteria2:=">=" + date1
 
------------------
voila mon code mais le problème c est que je recupere 2 date pour faire un tri entre deux date
 
mais je n 'y arrive pas
 
car ce qui est en rouge ne marche pas c est moi qu'y est écrit le code comme ca ,car en faisant une macro il me dit de mettre la date entre guillemet
 
-+-------------
   Range("B1" ).Select
    Selection.AutoFilter
   Selection.AutoFilter Field:=2, Criteria1:="<=08/11/2007", Operator:=xlAnd _
        , Criteria2:=">=02/11/2007"
 
------------------
 
 
mais moi je veux pou[#009b63][/#009b63]voir choisir la date depuis 2 textboxs  voila mon souci
 
merci pour votre aide
 
 
 
 
 

Pour Access (et je suppose aussi pour Excel), il faut entourer les dates avec des dièzes et les convertir au format US, ce qui donnerait pour 8 novembre, quelque chose comme
 Criteria1:= & "<=#11/08/2007#"
N.B. je n'ai pas testé.