【分享成果，随喜正能量】职场，如果你没有价值，那么你随时可能被取代;如果你的价值不如别人，那么社会也不会惯你，你将被无情地淘汰掉。不管什么时候，你一定要学会构建自己的价值。每个人都应该思考这个问题：我们对社会的价值是什么，我们能替这个社会解决什么问题，我们活着给这个世界带来的正面的东西是什么?如果你没有自己的核心竞争力，还天天想着发财，那只能是痴人说梦!

《VBA信息获取与处理》教程是我推出第六套教程，目前已经是第一版修订了。这套教程定位于最高级，是学完初级，中级后的教程。这部教程给大家讲解的内容有：跨应用程序信息获得、随机信息的利用、电子邮件的发送、VBA互联网数据抓取、VBA延时操作，剪切板应用、Split函数扩展、工作表信息与其他应用交互，FSO对象的利用、工作表及文件夹信息的获取、图形信息的获取以及定制工作表信息函数等等内容。程序文件通过32位和64位两种OFFICE系统测试。是非常抽象的，更具研究的价值。

教程共两册，八十四讲。今日的内容是专题二“随机数(Random)在EXCEL工作表及VBA中的应用”的第1讲：随机函数在Excel中的应用

第一节 在EXCEL中随机函数的利用

随机函数就是产生随机数的函数，是EXCEL中很重要的函数，应该说Excel和VBA对随机数的支持都是有限的。在Excel中，可以使用RAND工作表函数返回一个随机数D，其中0<=D<1。在分析工具包外接程序中，有一个名为RANDBETWEEN的函数，它将返回两个指定数字之间的随机整数。VBA有自己的随机函数Rnd，它返回一个随机数D，其中0<=D<1。在RAND函数和Rnd函数的基础上，我们可以设计出一些有用的公式和函数。

1 RAND函数，返回值含小数部分

返回到数字之间的十进制数（包括小数点后的小数部分），可以使用以下公式：=RAND()*(High-Low)+Low。

其中Low是所需范围内的最小值，High是所需范围内的最大值。公式将返回一个介于Low和High之间的值。

2 RAND函数，返回整数值

返回到数字之间的十进制数整数（不带小数部分的整数），可以使用：=TRUNC(RAND()*(High-Low)+Low)

上述公式中利用了一个TRUNC（）函数，这个函数直接去除数字的小数部分。

3 RAND 函数在数组中的应用

RAND函数是一个可以支持数组的函数，因此RAND单独或上面的任何一个公式都可以用于数组公式。需要注意的是，RAND是一个易失函数（volatile function），这意味着它将在任何计算时重新计算。这意味着函数的值将随每次计算而改变。如果希望仅在某些情况下更改随机数，可以使用带有循环引用的公式来创建仅在某些情况下重新计算的随机数。也可以利用“迭代”运算来完成重新计算随机数的结果。

我们看一下本节内容的截图：

本节知识点回向：什么是随机数？什么是随机函数？在EXCEL工作表中有哪些随机函数可以利用？如何返回两个数间的随机数？如何返回两个数间的随机整数？

再看看上面的截图E列的数为什么不是D列数的取整值？

本节内容详细代码“参考002工作表.XLSM”

我20多年的VBA实践经验，全部浓缩在下面的各个教程中，教程学习顺序：

① 7→1→3→2→6→5或者7→4→3→2→6→5。

② 7→8

各套教程内容简介:

第7套教程（共三册）：《VBA之EXCEL应用》：是对VBA基本的讲解

第1套教程（共三册）：《VBA代码解决方案》：是入门后的提高教程

第4套教程（16G）：VBA代码解决方案之视频（第一套的视频讲解）

第3套教程（共两册）：《VBA数组与字典解决方案》：是对数组和字典的专题讲解

第2套教程（共两册）：《VBA数据库解决方案》：是对数据库的专题讲解

第6套教程（共两册）：《VBA信息获取与处理》：讲解VBA的网络及跨程序应用

第5套教程（共两册）：VBA中类的解读和利用：类及接口技术的讲解

第8套教程（共三册）：VBA之Word应用（最新教程）：word中VBA的利用

• 第六套教程：VBA信息获取与处理，这是一部高级教程，涉及范围更广，实用性更强，面向中高级人员。教程共二十个专题，包括：跨应用程序信息获得、随机信息的利用、电子邮件的发送、VBA互联网数据抓取、VBA延时操作，剪切板应用、Split函数扩展、工作表信息与其他应用交互，FSO对象的利用、工作表及文件夹信息的获取、图形信息的获取以及定制工作表信息函数等等内容。程序文件通过32位和64位两种OFFICE系统测试。