OfficePK第12期：Excel挑战Access，快速生成不重复随机数

pureshadow

在Excel里生成随机数没什么，但要生成不重复的随机数有点麻烦，不过，再怎么麻烦，还是可以生成的。

于是就挑战一下Access吧，如何在Access中快速生成不重复的随机数。

Excel我会提供三种解法，叠代法、数组法和一个BT的简单方法，先悬念一下，过两天再来写。有知道各种解法的，也欢迎跟贴，这样我可以省点事。

pureshadow

将ID设置成随机，这个我会了，其他的……还是不会……我承认我是笨妖。

pureshadow

好吧，下来面看看Excel的解法。
第一种，迭代法。
把下面这个公式写在B2单元格里。

1. =IF(COUNTIF(B$2:B$11,A1)=1,A1,RANDBETWEEN(1,100))

复制代码

不过，按下回车，会被提示“循环错误”，所以还需要启用迭代计算：【文件】》【选项】》【公式】》勾选【启用迭代计算】/【最多迭代次数】改为1
如附件。

pureshadow

第二种，数组法。
既然是数组法，那就是用数组公式了，这公式还是写在B2单元格里：

1. =SMALL(IF(COUNTIF(B$1:B1,ROW($1:$10))=0,ROW($1:$10)),INT(RAND()*(10-ROW(A1))+1))

复制代码

如附件。

pureshadow

第三个BT法，不说了，直接上视频