3/ 在弹出窗口的左侧窗格中，单击加载项
4/ 勾选 分析工具库，单击确定
5/ Excel 功能区的“数据”选项卡上，现在有一个名为“分析”的组，就可以看到到“数据分析”的选项
使用分析工具包生成随机数:
可以在其中输入参数以生成随机数
变量数:这是输出表中所需的随机数列数。如果留空，则所有列都将填充在您指定的输出范围内 随机数:这是要生成的随机数的行数。如果留空，指定的输出范围将被填充 分布:可以从下拉列表中选择多种分布方法，例如均匀分布或正态分布。根据在此处的选择，参数部分将提供不同的选项 参数:输入值以表征选定的分布 随机种子:这是可选的，将是算法产生随机数的起点。如果再次使用相同的种子，它将产生相同的随机数。如果留空，它将从计时器事件中获取种子值 输出区域:输入要在电子表格中构建表格的位置的左上角单元格。如果您将变量参数留空，则需要指定整个区域。请注意，该区域内的现有数据将被覆盖 新建工作表：此选项将在工作簿中插入一个新工作表并将结果粘贴到单元格 A1单元格，在相邻的框中输入工作表名称，否则将使用默认名称 新建工作簿：这将创建一个新工作簿并将结果粘贴到第一张工作表的单元格 A1 单元格中
5/ 用 VBA 生成随机数
VBA（Visual Basic for Applications）是位于 Excel 前端的编程语言，也可用于生成随机数。但是，它比简单地在 Excel 中的单元格中输入公式要复杂，而且需要一些编程知识才能使用它
要打开 VBA 编辑器，请使用Alt + F11键盘快捷键
在窗口（项目资源管理器）的左侧窗格中，将看到打开的工作簿（包括加载项）和可用的工作表
在窗口顶部的菜单上，单击“插入”，然后单击“模块”。这将向当前电子表格添加一个模块窗口。将以下代码粘贴或添加到模块中
Sub RandomNumber() MsgBox Rnd() End Sub
按F5运行它，Excel 中将出现一条消息弹出窗口，并显示一个随机数。点击确定，您将返回代码窗口。
再次运行代码，将显示不同的随机数。随机数将介于 0 和 1 之间，但不包括 0 或 1 的值。
还可以为Rnd函数提供一个参数，该参数是用于生成随机数的算法起点的种子。如果种子值设置为负数或零，则每次将显示相同的随机数。
例如，如果您想生成 3 到 10 之间的完整随机数，则可以使用以下代码。此代码将随机数乘以 7，然后将其加 3，然后四舍五入到小数点零位。假设您想在单元格中显示您的随机数。您可以使用以下代码执行此操作
Sub RandomNumberSheet() Dim M As Integer For M = 1 To 5 ActiveSheet.Cells(M, 1) = Round((Rnd(10) * 7) + 3, 0) Next M End Sub
还有一个名为Randomize的 VBA 函数。可以在Rnd函数之前使用它来将种子值重置为计时器事件或任何给定的参数
Sub RandomNumberV2() Randomize (10) MsgBox Round((Rnd() * 7) + 3) End Sub
6/ 生成不重复的随机数
可能会遇到这样一种情况：想生成一系列随机数，但又不想看到任何重复值出现。
可能希望从 1 到 10 的数字之间选择 3 个随机数，但其中 3 个所选数字中的每一个都是唯一的。
有几种可能的解决方案：
RANK.EQ 和 COUNTIF 函数的解决方案：
先使用RANDBETWEEN创建随机数，然后使用下一列中的公式对它们进行排名，从而从 1 到 10 的随机排序序列
= RANDBETWEEN ( 1, 10 )
然后，可以使用RANK.EQ函数对它们进行排名，以创建一个从 1 到 10 的序列，该序列是随机排序的
= RANK.EQ ( B2, $B$2:$B$11 ) + COUNTIF ( $B$2:B2, B2 ) - 1
注意，公式使用了绝对引用（$符号），以便在向下复制公式时公式引用保持固定
用 VBA 解决：
还可以使用 VBA 生成一串从 1 到 10 的无重复随机数
Sub RandomNumberNoDuplicates() Dim M As Integer, Temp As String, RandN As Integer For M = 1 To 5 Repeat: RandN = Round((Rnd(10) * 9) + 1, 0) If InStr(Temp, RandN) Then GoTo Repeat ActiveSheet.Cells(M, 1) = RandN Temp = Temp & RandN & "|" Next M End Sub
代码迭代从 1 到 5 的值，每次生成 1 到 10 之间的随机数。
它测试随机数以检查它是否已经生成。这是通过将成功的数字连接成一个字符串然后搜索该字符串以查看该数字是否已被使用来完成的。
如果已找到，则它使用标签重复返回并重新生成一个新号码。再次测试它尚未使用。如果是新号码，则将其添加到工作表中
动态数组的解决方案：
假设要从序列 1 到 10 中返回 5 个数字。您希望每个选择的数字都是唯一的。这可以使用SEQUENCE、SORTBY、RANDARRAY和INDEX函数的组合来完成
=INDEX( SORTBY( SEQUENCE(10), RANDARRAY(10) ), SEQUENCE(5) )
上面的公式创建了一个从 1 到 10 的数字序列
然后使用SORTBY函数以随机顺序对它们进行排序，并对RANDARRAY函数生成的随机数列进行排序。效果是按随机顺序对序列进行排序。
现在，如果想获得 5 个随机且唯一的数字，只需从随机排序的序列中取出前 5 个数字。这正是INDEX函数所做的！这部分公式将从随机排序的序列中返回前 5 个数字
结论
在 Excel 中有多种生成随机数的方法。无论您需要整数、小数还是具有上限和下限的随机数范围，都可用Excel来生成。
但是，请记住，这些数字是由算法生成的伪随机数。尽管随机数生成器通过了所有随机性测试，但它们并不是真正的随机数
本文地址：百科问答频道 https://www.neebe.cn/wenda/868354_2.html，易企推百科一个免费的知识分享平台，本站部分文章来网络分享，本着互联网分享的精神，如有涉及到您的权益，请联系我们删除，谢谢！
相关阅读
