Microsoft 365 macro pour transposer une colonne en plusieurs

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #2

Bonjour Vaea,
En PJ un essai avec Somme.Si.Ens sans VBA :

VB:

=SOMME.SI.ENS(Tableau1[TYPE];Tableau1[REF];Tableau2[[#Cette ligne];[REF]];Tableau1[TYPE];Tableau2[[#En-têtes];[1]])

 

Pièces jointes

• test (5).xlsx

  16 KB · Affichages: 3

Vote positif 0 Vote négatif

fanfan38

XLDnaute Barbatruc

• 27 Février 2020

• #3

Bonjour
Ci joint ma solution par macro...
A+ François
Salut Sylvanu...

 

Pièces jointes

• test.xlsm

  17.1 KB · Affichages: 5

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 27 Février 2020

• #4

bonjour VAEA

un essai

 

Pièces jointes

• test (75).xlsm

  23.3 KB · Affichages: 9

Vote positif 0 Vote négatif

V

VAEA

XLDnaute Nouveau

• 27 Février 2020

• #5

Bonjour,

Un grand merci pour vos réponses.
@sylvanu : merci mais j'utilise des données Text et non des valeurs numériques
@fanfan38 : merci mais ma plage de données peut contenir X lignes, et donc ne pas figer en 7 lignes
@pierrejean : parfait merci beaucoup c'est le résultat que j'attendais.
En revanche, pourriez vous svp m'expliquer la fonction "dico" de votre macro ?

Merci d'avance, Vaea

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 27 Février 2020

• #6

Re
dico est un dictionnaire que l'on peut assimiler a un tableau a 2 colonnes
une colonne Keys et une colonne Items
la colonne Keys ne peut pas admettre de doublons
la syntaxe de remplissage dico(key)=item(key)
pour l'utilisation on use généralement des tableaux : dico.keys et dico.items

 

Vote positif 0 Vote négatif

V

VAEA

XLDnaute Nouveau

• 27 Février 2020

• #7

Merci pour vos explications,
Juste une petite erreur qui se glisse lors de l'exécution de la macro.
Certaines données en colonne B que j'utilise sont notés de la sorte "S-M" et lors de l'éxécution, tout ce qui est après le "-" saute et je me retrouve avec un "S" tout seul.

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 27 Février 2020

• #8

Bonjour à tous

Puisque tu as 365, avec POwerQuery intégré (depuis la version 2016) une solution PowerQuery

Actualiser avec Données, Actualiser Tout

Edit : ton pb ne se produira pas avec PowerQuery mais il faut adapter nom de la source et des colonnes...

Edit2 : j'ai mise à jour en fonction de ton nouveau format.
a noter que le code de PierreJean marche très bien sur ton second exemple...

 

Pièces jointes

• Croiser2.xlsx

  45.5 KB · Affichages: 5

Dernière édition: 27 Février 2020

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 27 Février 2020

• #9

Re
Salut Chris
@VAEA Je ne constate pas ce phénomène
Peux-tu poster un exemple STP ?

 

Vote positif 0 Vote négatif

V

VAEA

XLDnaute Nouveau

• 9 Mars 2020

• #10

Bonjour,

Merci pour toutes vos réponses, mon problème est résolu, cela me fait gagner beaucoup de temps
Merci encore bonne journée

 

Vote positif 0 Vote négatif