Bonjour,
j'ai des souci avec ces filtres, j'ai reussi a le faire marcher;mais j'air reesayer avec normalement les meme conditions et sa marche pas....
voila le code:
 
Sub itemfilt()
     
         
    current_program = "coucou.xls"
    MsgBox ("Selectionnez le fichier item(type excel)" )
 
    cheminfich = Application.GetOpenFilename   'ouvrir boite de dialogue
                                            'pour choisir un fichier
    nomfich = Split(cheminfich, "\" )(UBound(Split(cheminfich, "\" ))) 'separe le chemin du fichier
                                                                'pour recuperer le nom du
                                                                     'fichier seulement
    Workbooks.Open Filename:=cheminfich 'ouverture fichier item
     
    '***copie de la feuille critéres dans l'autre classeur*****
    Windows(current_program).Activate
       
    Sheets("Critères" ).Select
    Sheets("Critères" ).Copy After:=Workbooks("Item.xls" ).Sheets(1)
    Sheets("Item" ).Select
    Range("D1" ).Select
    Selection.Copy
    Sheets("Critères" ).Select
    Range("A1" ).Select
    ActiveSheet.Paste
 
    '**************copie de la premiere ligne*******
    Sheets.Add
    Sheets("Item" ).Select
    Range("A1" ).EntireRow.Select
    Selection.Copy
    Sheets("Feuil1" ).Select
    Range("A1" ).Select
    ActiveSheet.Paste
    '**********************************************
    '************filtre élab*************************
   Sheets("Item" ).Cells.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
        Sheets("Critères" ).Range("criteres" ), CopyToRange:=Sheets("Feuil1" ).Cells, Unique:=False
  '*************************************************
     
End Sub
 
 
Bon je par d'un classeur "coucou.xls",l'utilisateur doit aller chercher le fichier "item.xls".
Je copie la feuille de critere d'un classeur a l'autre et je crée un feuille pour receptionner les données...
 
L'erreur se trouve au niveau du filtre bien sur.(Erreur d'execution 1004:nom de champ introuvable ou incorrect dans la plage d'extraction)
 
 
Si vous avez des suggestions?
merci