Extraire des données de plusieurs feuilles [Fermé]

Signaler
-
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
-
Bonjour,

J'ai plusieurs classeurs qui contient les mêmes noms de feuilles mais avec des données différentes.

je m'explique:
Le classeur A contient les feuilles suivantes => Feuil1,Feuil2...Feuil10
Le classeur B contient les feuilles suivantes => Feuil1,Feuil2,..Feuil10
Le classeur C contient les feuilles suivantes => Feuil1,Feuil2,..Feuil10

Je souhaite avec la macro suivante (dont je remercie le Pignou) extraire les données de ces classeurs et les mettre dans une seule feuille du classeur Extraction de façon à ce que les données des feuilles F1 soient en même colonnes et les données de la feuille 2 dans la colonnes à coté.

Si c'est possible, les noms des feuilles soient les valeurs des cellules A1,B1,C1,...H1.

http://cjoint.com/?BKjoE7iTwEV

13 réponses

Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Merci, une réponse dans la soirée.
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
En espérant que la proposition est dans le bon sens : https://www.cjoint.com/?3KkwywCJQfW

Bonjour et merci pour le pingou,

Ca me fait erreur d'exécution '9' => Tabl = .Sheets("Feuil" & c).Range("b3:c16").

es ce que c'est par ce que mes feuilles sont nommés dans ce test en monday, Tuesday,...

Crdt,
MonceF
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Eh bien vous avez parlé de feuil1, feuil2 ....etc. alors le problème vient peut-être de là !
Pouvez-vous me mettre le fichier source que vous utilisez tels qu'il est sur https://www.cjoint.com/ et poster le lien ?

bonjour,

Le pingou, feuil1,feuil2...c'était juste un exemple :( dans mon cas actuel ,mes feuilles ont comme noms Monday, Tuesday, Wednesday, Thursday, Friday, Saturday et Sunday mais je compte pouvoir utiliser la même macro avec d'autres noms de feuilles si c'est possible biensur.
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Eh bien oui c'est juste un exemple mais quand vous dites :
je m'explique:
Le classeur A contient les feuilles suivantes => Feuil1,Feuil2...Feuil10
alors difficile d'imaginer que vous avez les noms des jours il n'y a que 7 jours, donc de 1 à 7 et non pas jusqu'à 10
Alors dans vos classeurs il ne peut y avoir que 7 feuilles au maximum ... est-ce bien cela ?

Bonjour,

mon classeur peut avoir plus que 7 feuilles et cles feuilles peuvent etre nommées Feuil1,Feuil2,...comme ca peut être des noms des jours.

désolé si je n'étais pas bien claire dés le début et merci beaucoup pour ton aide.
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Merci.
Je pars du principe que lors de l'exécution d'une extraction, les feuilles de tous les classeurs sont nommées selon le même qualificatif.

Bonjour,

est ce que c'est possible que la macro fait appelle aux noms des feuilles à partir d'une ligne renseignée en Feuil1,Feuil2,...ou Monday,...

Merci beaucoup Le Pingou.
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Est-ce que j'ai écrit dans le message précédent est correct ?

Oui c'est possible mais cela dépend ou se trouve cette ligne.

Note : c'est la solution que j'ai utilisé dans mon code pour avoir dans une colonne extraction les mêmes valeurs de feuille indépendamment de l'ordre dans les classeurs sources.
Oui c'est correcte et pour la ligne que t'as fais, j'ai essayé de la changer en monday... mais ca n'a pas marché.

si tu peux faire pareil je te serais reconnaissant ( en tete de la feuille extraction : Ligne A )
Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Merci, si tout va bien c'est pour demain.

Messages postés
9935
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
16 mars 2021
1 132
Bonjour,
Essayer la proposition suivante : https://www.cjoint.com/?3KoptsXnuka