OVH Cloud OVH Cloud

Comment créer un tableau à partir d'un autre tableau ?

2 réponses
Avatar
Tintin92
Bonjour,

Comment cr=E9er un tableau =E0 partir d'un autre tableau ?

Soit un tableau :

2 5
4 10
1 4

A partir d'un tableau de ce type, je souhaite g=E9n=E9rer les lignes
suivantes :

5
5
10
10
10
10
4

2 lignes avec le chiffre 5, 4 lignes avec le chiffre 10, etc...

Comment faire ?

merci

2 réponses

Avatar
JB
Bonjour,

Liste commence en A2:

Sub essai()
ligne = 0
For Each c In Range([A2], [a65000].End(xlUp))
For i = 1 To c.Value
[G2].Offset(ligne, 0) = c.Offset(0, 1).Value
ligne = ligne + 1
Next i
Next c
End Sub

Cordialement JB
Avatar
Tintin92
Merci.
ça à l'air de marcher.
On va voir à l'usage. ;-)

Tintin92