vaste lijst omzetten naar een lijst in willekeurig volgorde

[ome robbie]

Is het mogelijk om een lijst van bijv. 1 t/m 10 door een klik op een knop om te zetten naar een lijst in een willekeurige volgorde. zoals in voorbeeld aangegeven, maar dan door een druk op een knop. tweede kolom is dus willekeurig.

 

[mvdvlist]

Dat schijnt te kunnen met random of aselect, maar daar heb ik me nog niet in verdiept...

Bericht automatisch samengevoegd: Vandaag om 20:14

Zie bijlage, met een verborgen hulpkolom

 

[AlexCEL]

Excel 365:

=SORTEREN.OP(A1:A10;ASELECT.MATRIX(10))

F9 geeft nieuwe lijst.

 

[ome robbie]

hartelijk dank. met beide voorstellen kan ik uit de voeten.

 

[HSV]

Voor aan een knop.
De eerste is voor nieuwe, en de tweede voor oudere Excel-versies.

Sub hsv()
 Range("a1:a10") = [sortby(a1:a10,randarray(10))]
End Sub

Sub hsv_2()
 Range("a1:a10") = "=rand()"
 Range("a1:a10") = [index(rank(a1:a10,a1:a10),)]
End Sub

 

[emields]

of zo als je wil met een knop werken.
vba dus eerst opslaan als xlsm