XL 2016 transfert de données de plusieurs feuilles vers une seule VBA ou excel ?

MDAURORE1 · 23 Février 2022

Bonjour ,

Je suis gestionnaire de parc et je rencontre un problème .
J'ai plusieurs fichiers que mes gestionnaires de territoire remplissent. Je souhaite transférer les données de chaque feuille vers une seule feuille "parc Global" ( qui me recapitulerait l'ensemble du parc).
Le fichier que me remplissent les gestionnaire commencent par 4 colonnes : Territoire, dossier comptable, code analytique, immat.
Ce sont les données de ces 4 colonnes que je souhaite transférer dans ma feuille "Parc Global".

Est ce que je dois utiliser Excel ou VBA?
Est ce que quelqu'un peut m'aider à trouver la formule ou le code ?

J'ai fait un fichier test mais je n'arrive pas à le mettre en PJ

djidji59430 · 23 Février 2022

MDAURORE1 · 23 Février 2022

voici le fichier en question.

djidji59430 · 23 Février 2022

Bonjour à tous,

Tu fais ça avec power query. données==>obtenir des données
Si tu ne l'as pas tu le télécharges, ça fait partie d'Excel
Tu obtiens un tableau dynamique qui se modifie en fonction des tableaux sources

MDAURORE1 · 23 Février 2022

Merci merci beaucoup ! je vais de ce pas télécharger power query. données!

Phil69970 · 23 Février 2022

Bonjour @MDAURORE1 , @djidji59430

Je te propose ce fichier

*Merci de ton retour

@Phil69970

MDAURORE1 · 23 Février 2022

Phil69970 à dit:
Bonjour @MDAURORE1 , @djidji59430

Je te propose ce fichier

*Merci de ton retour

@Phil69970

merci beaucoup @Phil69970 c'est parfait !

MDAURORE1 · 23 Février 2022

Phil69970 à dit:
Bonjour @MDAURORE1 , @djidji59430

Je te propose ce fichier

*Merci de ton retour

@Phil69970

Bonjour Phil

J'ai voulu faire un copier coller sur le fichier source pour voir si cela fonctionnerait mais malheureusement cela n'a pas marché. Du coup est ce que tu peux me dire comment tu as procéder ? ( j'ai un niveau proche de 0 en VBA )

Phil69970 · 23 Février 2022

@MDAURORE1

Tout en image c'est plus parlant :

Et tu copie le code 4 au même endroit dans ton fichier

*Attention ton onglet "Parc global" doit exister sinon bug

Et si tu n'as pas l'onglet développeur le 1 sur l'image

*Que veux dire "malheureusement cela n'a pas marché" ??
Tu as un message d'erreur ? Lequel ? Autre ? Développe ......

@Phil69970

MDAURORE1 · 24 Février 2022

Phil69970 à dit:
@MDAURORE1

Tout en image c'est plus parlant :

Regarde la pièce jointe 1131753
Et tu copie le code 4 au même endroit dans ton fichier

*Attention ton onglet "Parc global" doit exister sinon bug

Et si tu n'as pas l'onglet développeur le 1 sur l'image

Regarde la pièce jointe 1131754

*Que veux dire "malheureusement cela n'a pas marché" ??
Tu as un message d'erreur ? Lequel ? Autre ? Développe ......

@Phil69970

Bonjour Phil

Je viens de refaire la manip, c'est bon ca fonctionne par contre 2 choses
Le transfert des données prends également la reprise des entêtes et je n'ai pas le bouton " Grouper les feuilles"

Phil69970 · 24 Février 2022

@MDAURORE1

MDAURORE1 à dit:
Le transfert des données prends également la reprise des entêtes

1)Si tes données sont comme sur le fichier test (exactement la même disposition) les entêtes ne sont pas reprises comme sur le fichier test que tu as fourni
Si c'est pas cela explique mieux ou met le fichier

MDAURORE1 à dit:
je n'ai pas le bouton " Grouper les feuilles"

2)Pour le bouton ==> Tout en image
Bien prendre le bouton sous Contrôle ActiveX comme dans l'image

Et tu agrandis la zone

Soit :
Pour t'éviter de trop bidouiller Tu remplaces

VB:

Sub CommandButton1_Click()
Regroupe_Feuilles
End Sub

Par :

VB:

Sub CommandButton1_Click()
CommandButton1.Caption = "Grouper les feuilles"  'Apres la modif tu peux supprimer la ligne
CommandButton1.BackColor = vbGreen  'Apres la modif tu peux supprimer la ligne (couleur verte)
Regroupe_Feuilles
End Sub

OU soit tu mets les mains dans le cambouis : (c'est l'un ou l'autre mais pas les 2)

Sur le bouton ==> clique droit ==> Propriété

==>

Et pour la couleur du bouton

Et tu choisis la couleur que tu veux ....

*Merci de ton retour

@Phil69970

KIM · 5 Août 2022

Bonjour Phil, bonjour le fil,
En reprenant ta macro Regroupe_Feuilles du fichier Regrouper les onglets V1.xlsm du message #6,
1- comment rajouter le nom de chaque feuille en 1ère col de la feuille à regrouper dans l'onglet "Parc Global" ?
2- Comment regrouper certaines colonnes seulement des feuilles concernées?

Merci d'avance
KIM

XL 2016 transfert de données de plusieurs feuilles vers une seule VBA ou excel ?

MDAURORE1

XLDnaute Nouveau

djidji59430

XLDnaute Barbatruc

MDAURORE1

XLDnaute Nouveau

Pièces jointes

djidji59430

XLDnaute Barbatruc

Pièces jointes

MDAURORE1

XLDnaute Nouveau

Phil69970

XLDnaute Barbatruc

Pièces jointes

MDAURORE1

XLDnaute Nouveau

MDAURORE1

XLDnaute Nouveau

Phil69970

XLDnaute Barbatruc

MDAURORE1

XLDnaute Nouveau

Phil69970

XLDnaute Barbatruc

KIM

XLDnaute Accro

Discussions similaires