EXCE 中如何对一组数随机排列成一组数。

来源：百度知道 编辑：UC知道 时间：2024/05/03 05:35:16
比如0123456789 + - / *〈 〉这16个数随机排列成21位数，不重复
4行，每行21个数

用RND函数加MID函数结合一下即可完成你的要求。代码如下：
Sub noky()
For i = 1 To 21
a = Int((16 - 1 + 1) * Rnd + 1)
B = Mid("0123456789+-/*〈〉", a, 1)
c = c + B
Next
End Sub
这段代码中的变量C就是你要的随机数