Discussion :

[cpf2006]

A partir d'une feuille de donnée excel, je voudrais filtrer, à l'aide d'une macro, ses données et copier les résultats dans une autre feuille du même classeur. Merci d'avance pour les réponses

[Gorfael]

Salut cpf2006 et le forum

A partir d'une feuille de donnée excel, je voudrais filtrer, à l'aide d'une macro, ses données et copier les résultats dans une autre feuille du même classeur.

Euh... ben, tu mets un fitre sur ta feuillle et tu fait un copier sur la plage filtrée et tu fais un coller sur l'autre.

La précision de la réponse est toujours proportionnelle à la précision de la demande!
Une généralité attend une généralité!

filtrer ? avec filtre auto ? Filtre élaboré ? filtre anti UV ?

A+

[David2304]

Bonjour,

Quel genre de filtre veux-tu faire ?
Tu peux ptet utiliser For each

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
i = 0
For each cel in Range("...")
If cel = "..." then
Worksheets("Feuil2").cells(i,1) = cel
i = i + 1
end if
Next

[fring]

@ David

Il serait judicieux, si tu n'es pas certain de ton coup, de tester ton code avant de le proposer.

En début de procédure, tu initialises i à 0.
Au premier passage de la boucle tu vas donc obtenir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Feuil2").cells(0, 1) = cel

La ligne 0 va provoquer un joli bug

[David2304]

Oui désolé je viens juste de m'enrendre compte
A vouloir répondre trop vite on commet des ptites erreurs

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
i = 1
For each cel in Range("...")
If cel = "..." then
Worksheets("Feuil2").cells(i,1) = cel
i = i + 1
end if
Next

là c mieux