如何在EXCEL中用随机数表抽样且结果不重复?要简单易行的方法.

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/27 20:17:39
如何在EXCEL中用随机数表抽样且结果不重复?要简单易行的方法.
xJA_ܵSxjtaRݮвՕJ DK}R`Ъάo8ޝaFb~Γ4>i7k>֘#wS^N䵅=gVswg?Vh;.y{ڼ%#2twĜ^6lĵݗN^𴍽2>/fdc8v%fzwq2IS1#SWnd*l@!/FEH\d6(Ț㼠 */Tτ EAql(  S/ĺyFlY]:gIZmRa"4F))kZQBiӴx2 ^C -ɈͿ#

如何在EXCEL中用随机数表抽样且结果不重复?要简单易行的方法.
如何在EXCEL中用随机数表抽样且结果不重复?要简单易行的方法.

如何在EXCEL中用随机数表抽样且结果不重复?要简单易行的方法.
给你一个随机整数的VBA代码,记得点采纳哦.
Sub Comm()
Randomize Timer
Dim c(255) As Byte
For i = 1 To 255 '
c(i) = i
Next
k = 255
Do While l < 255
r = Int(Rnd() * k) + 1 '
aa = c(r)
c(r) = c(k)
c(k) = aa
k = k - 1
l = l + 1
Cells(l,1) = aa
Loop
End Sub