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

[MDAURORE1]

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]

 

[MDAURORE1]

voici le fichier en question.

 

[djidji59430]

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]

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

 

[Phil69970]

Bonjour @MDAURORE1 , @djidji59430

Je te propose ce fichier

*Merci de ton retour

@Phil69970

 

[MDAURORE1]

Bonjour @MDAURORE1 , @djidji59430

Je te propose ce fichier

*Merci de ton retour

@Phil69970

merci beaucoup @Phil69970 c'est parfait !

 

[MDAURORE1]

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]

@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]

@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]

@MDAURORE1

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

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

Sub CommandButton1_Click()
Regroupe_Feuilles
End Sub

Par :

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]

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