I have a 1D array with 40 elements. Element 1 = 1, 2 = 2 etc. I wan
to scramble the numbers within the array. So I want all 40 number
still but scrambled. What is the easiest way to do this?

Dim RandomColumnArray (40) As Variant

'Load Array with numbers from 1 to 40
For X = 1 To ColumnCount
RandomColumnArray(X) = X
Next X

'Scramble Array
???????

--
Message posted from http://www.ExcelForum.com