vba生成一个随机数范围在1499到15008之间

以下是VBA代码：

Dim randomNum As Double
Randomize
randomNum = 14.99 + Rnd() * (15.008 - 14.99)
MsgBox randomNum

首先，我们声明一个变量 randomNum 作为随机数的存储位置。

然后我们使用 Randomize 函数来初始化随机数生成器。

接着，我们使用 Rnd() 函数生成一个介于0和1之间的随机数，并将其乘以范围之间的差值，再加上较小的值14.99，以将其置于所需范围内。

最后，我们使用 MsgBox 函数在屏幕上显示生成的随机数。