【EXCEL VBA】抽奖工具： 从N个姓名中随机抽出M个人（M<=N)

稍等，我给我写一个

sheet1表A列为姓名列（不限定人数），sheet2表的B2输入需要抽取的人数，如果大于名单人数，会提示超出并停止运行，否则在D列列出抽中名单（不重复，数组与字典相结合的方法完成）

=INT(RAND()52)

假设你有52个目标待选,在一个文件表的A1中输入上述值每打开一次文件就会出现一个新值然后关闭文件再打开文件读第二次你还可以约定重复和0是无效的

1、用随机函数rand分配给每个人一个抽签号，A1单元格里输入公式：

=int(rand()1000)

然后下拉填充。

2、然后选中A列，设置条件格式，用公式将前三名（或自定）设置为红色，公式为：

=rank(a1,a:a)<4

(<4意思是取前3名,如果要取前5名就改为<6，以此类推)

3、每次可按F9键刷新一下结果

以上就是关于【EXCEL VBA】抽奖工具： 从N个姓名中随机抽出M个人（M<=N)全部的内容，包括:【EXCEL VBA】抽奖工具： 从N个姓名中随机抽出M个人（M<=N)、EXCEL抽奖程序、EXCEL 抽奖 怎么做等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！