可以在VBA中使用rand（）函数吗？怎么使用？我在使用时，提示函数未定义

Rnd 函数
返回一个包含随机数值的 Single。
语法
Rnd[(number)]
可选的 number 参数是 Single 或任何有效的数值表达式。
返回值
如果 number 的值是 Rnd 生成
小于 0 每次都使用 number 作为随机数种子得到的相同结果。
大于 0 序列中的下一个随机数。
等于 0 最近生成的数。
省略 序列中的下一个随机数。
说明
Rnd 函数返回小于 1 但大于或等于 0 的值。
number 的值决定了 Rnd 生成随机数的方式。
对最初给定的种子都会生成相同的数列，因为每一次调用 Rnd 函数都用数列中的前一个数作为下一个数的种子。
在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有根据系统计时器得到的种子。
为了生成某个范围内的随机整数，可使用以下公式：
Int((upperbound - lowerbound + 1) Rnd + lowerbound)
这里，upperbound 是随机数范围的上限，而 lowerbound 则是随机数范围的下限。
注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。

做好这类题目的关键是理解 rnd 函数的取值范围：
Rnd 函数返回小于 1 但大于或等于 0 的值。
想清楚了这点，写代码就容易多了，否则只能死记硬背，还容易记错
(下限，上限) ：Int(Rnd() (上限 - 下限 - 1) + 下限 + 1)
[下限，上限] ：Int(Rnd() (上限 - 下限 + 1) + 下限)
(下限，上限] ：Int(Rnd() (上限 - 下限) + 下限 + 1)
[下限，上限) ：Int(Rnd() (上限 - 下限) + 下限)
即：
(100，200) ：Int(Rnd() 99 + 101)
[100，200] ：Int(Rnd() 101 + 100)
(100，200] ：Int(Rnd() 100 + 101)
[100，200) ：Int(Rnd() 100 + 100)

这是一个较复杂的数学问题：我记得看到过相关介绍，具体不记得是哪里了。
你可以搜一搜关键字为“产生随机数的算法”的相关内容。大致原理如下：
在计算机程序设计语言中，都有定义了产生随机数的函数，程序员只要调用该函数，就可以产生随机数。数学中，函数需要有一个（或多个）自变量，那么产生随机数的函数，也需要一个自变量。
下面解释vb的rnd函数与randomize函数的作用与关系：
rnd函数需要一个自变量（也叫做产生随机数的种子），来产生一个随机数。但是，我们在使用rnd函数的时候，并没有给过它什么种子数？这就与randomize函数有关了：
1，当使用rnd函数之前，如果没有使用randomize函数，那么，系统就以某一个固定的数值作为rnd函数的种子，从而产生第1个随机数，接下来第2次呢，就以第1次产生的随机数作为种子，来产生第2个随机数，第3次呢，就以第2次产生的随机数作为种子，来产生第3个随机数，。一直按这个样方法产生一系列随机数，所以，在不使用randomize函数的情况下，每次使用rnd函数产生的随机数序列是相同的。
2，当使用rnd函数之前，如果使用了randomize函数，那么randomize函数会产生一个随机数，然后，当第1次使用rnd函数产生随机数的时候，系统会把由randomize函数产生的随机数给rnd函数作为第1次的种子。
3，randomize函数的使用格式：
randomize
[参数]
其中参数，是一个数字，用来作为randomize函数产生随机数的种子。如果，每次用相同的参数，作为randomize的种子，那么，结果还是一样，得到的序列是相同的。
例如：
randomize
1
for
i
=
1
to
100
print
rnd
next
i
但是，randomize函数的格式中，参数是可选的，当不带参数的时候，系统会将计算机的时钟（具体不知道使用时钟的什么数据）作为randomize函数的种子，这样以来，有于计算机时钟是在变化的，特别是它的变化周期比较长，这样，就可以产生不同序列的随机数了。
例如：
randomize
for
i
=
1
to
100
print
rnd
next
i
大概的原理就是这样，有不当之处请指正。
记得以前学c语言还是数据结构的书上，专门介绍如何编写产生随机数的函数。

公式是int(rnd()2)
rnd()产生的是[0,1)的数，rnd()2产生的就是[0,2)的数。
int(n)是一个截尾函数，得到一个不大于n的最大整数，int(1999)的值是1。
所以int(rnd()2)产生的就是大于等于0，小于2的整数，即0和1

Rnd是一个能产生[0,1)之间的双精度随即数的函数。int(N)是一个取小于或等于N的最大整数的函数，比如int(45)=4，int(-45)=5。
int(rnd的使用方法:
int(rnd范围+基数)
比如:int(rndm+n)意为产生[n,m+n-1]之间的随机数
例:假设你想要将随即产生的40到60之间(包括40和60)的6个随即整数存放到一个一维数组suijishu()里边语句为:
dim
suijishu(1
to
6)
as
integer,
i
as
integer
for
i
=
1
to
6
suijishu(i)=int(rnd21+40)
next
i
分析:
0<=rnd<1
0<=rnd21<21
40<=rnd21+40<61
40<=int(rnd21+40)<=60

答：VBA里的随机函数是RND，在工作表中随机函数是RAND，一字之差，大家可要记好了。
RND函数的用法如下。
格式：Rnd(<数值表达式)
功能：求(0,1)之间的一个随机数语法：Rnd[(number)]
如果
number
的值是
Randomize
生成
小于
0
，每次都使用
number
作为随机数种子得到的相同结果。
大于
0
，以上一个随机数为种子产生下一个随机数。
等于
0
，产生与最近生成的随机数相同的随机数。
省略，
以上一个随机数为种子产生下一个随机数。
说明Rnd
函数返回小于
1
但大于或等于
0
的值。
number
的值决定了
Rnd
生成随机数的方式。
对最初给定的种子都会生成相同的数列，因为每一次调用
Rnd
函数都用数列中的前一个数作为下一个数的种子。
在调用
Rnd
之前，先使用无参数的Randomize
语句初始化随机数生成器（若带参数，则产生由参数对应的一个特定序列的随机数），该生成器具有根据系统计时器得到的种子。
为了生成某个范围内的随机整数，可使用以下公式：
Int((upperbound
-
lowerbound
+
1)

Rnd
+
lowerbound)
这里，upperbound
是随机数范围的上限，而
lowerbound
则是随机数范围的下限。
注意
若想得到重复的随机数序列，在使用具有数值参数的
Randomize
之前直接调用具有负参数值的
Rnd。使用具有同样
number
值的
Randomize
是不会得到重复的随机数序列的。
2、Int((upperbound
-
lowerbound
+
1)

Rnd
+
lowerbound)编辑本段Rnd
函数示例
本示例使用
Rnd
函数随机生成一个
1
到
6
的随机整数。
DimMyValueMyValue
=
Int((6

Rnd)
+
1)
'
生成
1
到
6
之间的随机数值
,这里的int
是把后面产生的小数转换成整数

---