C Chris Guest 8 Avril 2005 #1 Salut le forum, Je rencontre un petit probleme de syntaxe, dans l'expression suivante. [Options!A4].CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[Options!A1:A2], CopyToRange:=[opt1!A2] Dans CopyToRange comment faire pour que le nom de la feuille soit une variable. opt1 contient le nom la feuille sur laquelle il faut copier les donées. Merci d'avance @+ Chris
Salut le forum, Je rencontre un petit probleme de syntaxe, dans l'expression suivante. [Options!A4].CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[Options!A1:A2], CopyToRange:=[opt1!A2] Dans CopyToRange comment faire pour que le nom de la feuille soit une variable. opt1 contient le nom la feuille sur laquelle il faut copier les donées. Merci d'avance @+ Chris
@ @Christophe@ XLDnaute Occasionnel 8 Avril 2005 #2 Bonjour, Essaye comme cela CopyToRange:='[' & opt1 & '!A2]' Bonne journée Vote positif 0 Vote négatif
A Abel XLDnaute Accro 8 Avril 2005 #3 Bonjour Chris, Ci après un exemple. Code: Feuille = 'Feuil2' Cible = 'a2' [Feuil1!A4].CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[Feuil1!A1:A2], CopyToRange:=Sheets(Feuille).Range(Cible) En espérant que cela te dépanne. Abel. Vote positif 0 Vote négatif
Bonjour Chris, Ci après un exemple. Code: Feuille = 'Feuil2' Cible = 'a2' [Feuil1!A4].CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=[Feuil1!A1:A2], CopyToRange:=Sheets(Feuille).Range(Cible) En espérant que cela te dépanne. Abel.
A Abel XLDnaute Accro 8 Avril 2005 #4 Re, Oups ! Paf ! Patatrac ! PArdon Christophe. Pas rafraichi. Abel. Vote positif 0 Vote négatif
@ @Christophe@ XLDnaute Occasionnel 8 Avril 2005 #6 Bonjour Abel, Pas de problème, presque syncro. Deux réponses pour le prix d'une pour le forumeurs Chris bonne journée à vous Vote positif 0 Vote négatif
Bonjour Abel, Pas de problème, presque syncro. Deux réponses pour le prix d'une pour le forumeurs Chris bonne journée à vous