XL 2016 Liste de références que je souhaite insérer en 10 fois.

Cotriana

XLDnaute Nouveau
Bonjour à tous,

Actuellement en train de travailler sur la création d'un outil, j'aurais besoin de répéter ma liste de références, mais je ne sais pas comment faire ça de manière automatisée avec une macro. Je pense à une boucle mais je n'arrive jamais à les programmer.

Ci-joint, vous trouverez un exemple de liste de références. J'aimerai les développer comme l'exemple visible ci-dessous.

Par exemple, une liste de réf :
A
B
C
D
J'aimerai que ma liste devienne :
A
A
A
A
A
B
B
B
B
B
C
C
C
C
C
D
D
D
D
D

Bien cordialement, je vous remercie d'avance pour vos aides.
 

Pièces jointes

  • exemple.xlsm
    87.9 KB · Affichages: 5

JHA

XLDnaute Barbatruc
Bonjour à tous,

Une solution assez simple avec power query
1) tu copies la liste sur la droite (ici 5 fois)
2) Sur power Query, on sélectionne tout et dépivoter les colonnes.

JHA
 

Pièces jointes

  • exemple.xlsm
    233.9 KB · Affichages: 4

Hasco

XLDnaute Barbatruc
Repose en paix
Re,

Puisque nous en sommes à power query, deux requêtes dont une très courte (1 ligne) après avoir nommé A1:A80 'Références' :
= Table.FromColumns({List.Sort(List.Repeat(Excel.CurrentWorkbook(){[Name="Références"]}[Content][Column1],5))},{"Références"})
Les nouvelles versions de powerquery permettent de retourner une liste dans un classeur, Table.FromColumns n'est plus nécessaire dans ce cas :
=List.Sort(List.Repeat(Excel.CurrentWorkbook(){[Name="Références"]}[Content][Column1],5))
suffit à retourner la colonne qui prendra pour entête le nom de la requête.

Cordialement
 

Pièces jointes

  • Cotriana-exemple.xlsm
    113.4 KB · Affichages: 2

Discussions similaires

Statistiques des forums

Discussions
312 895
Messages
2 093 383
Membres
105 714
dernier inscrit
POKITO