Liste aléatoire

Bonjour,

Je cherche a créer sous forme d'une colonne une liste de groupe tirés aléatoirement. Je donne un chiffre à chaque groupe:

5
9
7
2
6
...

j'ai rédigé:

sub listealatoire

a=nombre de groupe

sub boucle_for ()

     for i=0 to a

b+i= alea.entre.borne (1,a-i)
cell(i+1,1)=b+1

next
end sub
end sub

Qu'en pensez-vous?