Problème VBA boucle avec filtre

Résolu/Fermé
jubo26 - 14 déc. 2012 à 18:04
 jubo26 - 16 déc. 2012 à 21:59
Bonjour,


Voilà, je veux faire une boucle avec un autofilter sous VBA.
Cet autofilter doit filtrer uniquement sur une seule colonne. (colonne F excel)
Cette boucle doit à chaque fois filtrer chaque élément de cette colonne.
Par exemple j'ai un fichier le lien ci-dessous:


http://cjoint.com/?BLor7RCWocM

Il y a 3 colonnes, je voudrais faire un filtre sur la colonne Service (colonne F)
La boucle doit prendre chaque élément pour les filtrer (DAF, DI, DRH, etc)

En faite, l'objectif de cette manipulation est de copier-coller le nom, le prénom et le service dans un nouveau fichier en fonction du service que j'enregistrerai sous le nom du service concerné (DAF, DIF, etc).
Je dois également respecter les contraintes suivantes :
Les données du fichier de départ ne doivent pas disparaître. Ainsi, je dois copier-coller les données dans un nouveau fichier et non les couper-coller.
Le fichier de départ commence à la ligne 4 et colonne D
Les nouveaux fichiers doivent commencer à la ligne 1 et colonne A

C'est pour ça que j'ai besoin de faire une boucle et d'utiliser l'autofilter.
Là je sais le faire pour quelques variables mais je vais en avoir une centaine! Du coup comment pourrais-je faire pour que l'autofilter sélectionne directement chaque élément de la colonne?
Merci pour votre aide
Julien
A voir également:

2 réponses

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 249
Modifié par eriiic le 14/12/2012 à 21:31
Bonjour,

c'est quoi la différence avec cette question : https://forums.commentcamarche.net/forum/affich-26596080-probleme-pour-faire-une-boucle-avec-l-autofilter-en-vba ?

Les données du fichier de départ ne doivent pas disparaître.
Travaille sur une copie, c'est tout.
Ou n'enregistre pas le fichier d'origine après le traitement.

eric

Jamais tu ne répondras à un mp non sollicité...
Bon, ça c'est fait.
0
Merci beaucoup. J'ai réussi à faire fonctionner cette macro en faisant comme tu as dis.
0