怎樣將一些數值RAMDOM 到不同的儲存格

1^# 跳轉到 »

發表於 2013-2-25 23:24 | 顯示全部帖子

如果不限定单元格的话，2#就可以了
如果是在限定的单元格中随机的话，就有点麻烦了。
要先将限定单元格存入数组A，使用经典算法产生不重复随机数，填入上面数组A的同型数组B
再将A1填入数组B编号为1对应下标的那个数组A单元格中

向高手学习

2^#

發表於 2013-2-25 23:28 | 顯示全部帖子

For i = 0 To 9
Cells(WorkSheetFunction.RandBetween(2,Rows.Count*Columns.Count)).Value = Range("A1").Offset(i, 0)
Next

向高手学习

靜思自在 : 修行要繫緣修心，藉事練心，隨處養心。