lennynero256
XLDnaute Junior
Bonjour,
j'ai un classeur comprenant une feuille "SYNTHESE" avec un tableau global (par colonne : ville, activité, age)
j'essaie de faire une macro qui me permettrait d'afficher les données triées par critères sur d'autres feuilles du même classeur.
ex : une feuille A ou les données seraient triées par ville, une autre B par activité et une autre C par âge. J'essaie d'adapter une macro trouvée sur le forum, mais elle ne fonctionne pas.
Voici pour un copier coller sur la feuille A
ca ne trie pas...
classeur exemple en pj
j'ai un classeur comprenant une feuille "SYNTHESE" avec un tableau global (par colonne : ville, activité, age)
j'essaie de faire une macro qui me permettrait d'afficher les données triées par critères sur d'autres feuilles du même classeur.
ex : une feuille A ou les données seraient triées par ville, une autre B par activité et une autre C par âge. J'essaie d'adapter une macro trouvée sur le forum, mais elle ne fonctionne pas.
Voici pour un copier coller sur la feuille A
Code:
Sub CopierAvecFiltre()
Application.ScreenUpdating = False
'Recopie vers feuille 1
Sheets("SYNTHESE").Select
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="<>"
Range("A1").Select
ActiveCell.Offset(1, 0).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("A").Select
Range("A2").Select
ActiveSheet.Paste
Range("A1").Select
Application.ScreenUpdating = False
End Sub
ca ne trie pas...
classeur exemple en pj
Pièces jointes
Dernière édition: