Microsoft 365 Macro Produit Multi-modèles

chris

XLDnaute Barbatruc

• 24 Avril 2023

• #2

Bonjour
Pourquoi un nouveau sujet https://excel-downloads.com/threads...s-multi-modeles.20064871/page-2#post-20575021 ?

Une proposition PowerQuery intégré à Excel

 

Pièces jointes

• Produits-multimodeles_PQ.xlsm

  19.7 KB · Affichages: 4

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 24 Avril 2023

• #3

Bonjour,
Bonjour Chris 🙂
Comme je l'ai fait, je vais aussi proposer via Power Query (code différent, mais même résultat, c'est le principal...)
Bonne journée

 

Pièces jointes

• PQ_Group_Marques.xlsm

  19.8 KB · Affichages: 3

Vote positif 0 Vote négatif

A

Aleksii

XLDnaute Nouveau

• 24 Avril 2023

• #4

Bonjour,

Merci pour vos réponses. J'ai peur de vous faire crier au scandale, mais je n'ai aucune idée du comment lancer et modifier vos résultats.

Pour répondre à la question du sujet, c'est tout simplement parce que je n'ai aucun retour à mes derniers messages.

Merci.

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 24 Avril 2023

• #5

Re-,
Pour adapter à ton fichier.
Que ce soit avec la solution de Chris ou la mienne, il faut que tes données soient dans un Tableau Structuré (nommé Tableau1 chez moi, ou Data chez Chris)
Que les noms de colonne soient identiques.
Puis (du moins pour mon fichier), tu vas dans l'onglet "T_Final", et tu cliques sur "Données/Actualiser tout" (ou clic droit dans la requête, "Actualiser")
Et c'est tout...

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 24 Avril 2023

• #6

Bonjour à tous
Pas rafraichi assez tot, du coup je poste quand même
Je regarde vos solutions
@+ Lolote83

 

Pièces jointes

• Copie de ALEKSSI - produits-multimodeles.xlsm

  17.9 KB · Affichages: 2

Vote positif 0 Vote négatif

A

Aleksii

XLDnaute Nouveau

• 24 Avril 2023

• #7

Ok merci, j'ai trouvé. Pas mal Power Query effectivement. Juste une remarque j'ai des virgules dans la colonne Marque. Comment les supprimer ?

VB:

= Table.Group(FusionMC,{"Référence","Marque"},{{"NM", each Text.Combine(List.Distinct([Modèles])," , ")}})

Merci.

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 24 Avril 2023

• #8

Re-,
Ben, tu vas le faire toi-même.... 😉
Lorsque tu es dans l'éditeur PQ, tu cliques sur l'étape "FusionMarque", tu sélectionnes la colonne "Marque", puis dans le ruban "Transformer", tu cliques sur "Remplacer les valeurs", "Remplacer les valeurs", tu valides "Insérer une étape"
Tu entres la virgule dans la 1 ère case (Valeur à rechercher), et rien dans l'autre, puis "OK"
Et voili

 

Vote positif 0 Vote négatif

A

Aleksii

XLDnaute Nouveau

• 24 Avril 2023

• #9

Lolote83 à dit:

Bonjour à tous
Pas rafraichi assez tot, du coup je poste quand même
Je regarde vos solutions
@+ Lolote83

Cliquez pour agrandir...

Bonjour,

J'aime bien sous macro, je vais pouvoir l'intégrer. J'arrive pas à mettre les résultat sur une autre feuille. Je vois que le code est très ciblé. L'idée est de travailler à la colonne et reporter le résulat sur une autre feuille. J'aurai du le préciser.

 

Vote positif 0 Vote négatif

A

Aleksii

XLDnaute Nouveau

• 24 Avril 2023

• #10

Cousinhub à dit:

Re-,
Ben, tu vas le faire toi-même.... 😉
Lorsque tu es dans l'éditeur PQ, tu cliques sur l'étape "FusionMarque", tu sélectionnes la colonne "Marque", puis dans le ruban "Transformer", tu cliques sur "Remplacer les valeurs", "Remplacer les valeurs", tu valides "Insérer une étape"
Tu entres la virgule dans la 1 ère case (Valeur à rechercher), et rien dans l'autre, puis "OK"
Et voili

Cliquez pour agrandir...

Top ! Merci beaucoup. J'ai découvert Power Query aujourd'hui !
J'avais pas capté la liste des formule à droite 👍

 

Vote positif 0 Vote négatif