XL 2013 [Résolu] Transposer colonnes en lignes sans doublons

[Lone-wolf]

Bonjour à toutes et à tous

Est-ce que quelqu'un pourrait me donner un exemple de comment transposer un tableau avec conditions par VBA.
Le résultat éscompté est sur la feuille.

Par avance Merci.

 

[ginteo]

Je dirai que d'abord tu créé ta colonne sans doublon en adaptant la formule

=SIERREUR(INDEX(D$17$512;EQUIV(PETITE.VALEUR(SI((NB.SI(L$7:L7;D$17$512)=0)*(D$17$512<>"");NB.SI(D$17$512;"<"&D$17$512));1);SI(D$17$512<>"";NB.SI(D$17$512;"<"&D$17$512));0));" ")

L$7:L7 est une celulle vide juste au-dessus de ton tableau
D$17$512 est ton tableau (ici il est fixe mais tu peux adapter pour qu'il soit variable

et après tu transpose ce tableau avec la formule transpose

ps :: le smiley est : suivi de D ^^

 

[Lone-wolf]

Re ginteo

Toi pas avoir compris, no formula mas VBA

 

[ginteo]

je suis nul en vba...
sinon tu recupère le code vba de cette formule avec la comande debug et execution ?? ça peut peut être marcher

 

[Paritec]

Bonjour Loner Wolf le forum
ton fichier en retour tu cliques traiter
a+
Papou

 

[Lone-wolf]

Bonjour Papou

Merci, t'es un chef.