体育比赛分组——随机抽签EXCEL程序

•excel软件1.打开excel，建立两个表格，分别命名为【员工花名册】和【中奖名单】，分两个表格只是为了抽奖时放大效果。

当然，你也可以只在一个表格上操作。

2.在【员工花名册】表格中，空白处输入公式【=rand()】。

3.接着按【回车/enter】，就能看到一个随机数值，下拉填充与员工数量对等。

4.打开另一个子表格【中奖名单】，选择一个空白格，输入公式：=INDEX(员工花名册!C$3:C$22,RANK(员工花名册!E3,员工花名册!E$3:E$22))5.接着按【回车/enter】，就能看到一个随机员工名字，中奖几个人，就下拉填充几行。

6.公式设置结束后，可根据自己喜好，对抽奖版面进行修饰。

7.最后，抽奖时，长按【F9】，让名单滚动，停下时，即可选出中奖名单。

END•运用到的函数分别有rand、rank、index•注意数据的绝对值手把手教你制作Excel抽奖器2014-11-15 作者:ExcelHome 阅读:154612次三国公司开年会，现场举行一次抽奖环节，要从50个人中，抽取10个幸运者，要求每个姓名只能出现一次。

职工名单如下图所示：在Excel中制作随机抽奖的效果，核心是生成一组随机不重复值。

首先，在B4输入以下公式，向下复制至B53：= RAND()RAND函数的作用是生成介于 0 到 1 之间的随机数（变量）。

******************D4单元格输入以下公式，向下复制：=INDEX(A$4:A$53,RANK(B4,B$4:B$53))简单说一下公式的意思：RANK(B4,B$4:B$53)RANK函数对B4:B53单元格产生的随机数字排序，生成了随机的1-50的数字。

RANK函数的计算结果将用于INDEX函数的参数。

INDEX函数返回表格(B4:B53)中的元素值，此元素由行号的索引值(也就是RANK 函数的运算结果)给定。

因为B列的数字是完全随机的，所以任何数字出现在前10行的概率都相同。

如何快速在Excel里实现随机分组？这个操作很简单！关键字：随机分组；Excel技巧；简单栏目：技巧全文596字，预计1.5分钟读完大家好呀，今天来给大家分享如何快速在Excel里实现随机分组。

如下图所示，有15个人，现在要随机分成3组，每组5个人。

只要简单两步，就能完成分组。

第一步：为每个人设置一个随机数并编序号C列输入公式=RAND()，在每个姓名后面加一个随机数。

D列输入公式=RANK(C2,$C$2:$C$16)，为每个随机数编个序号。

表格每次操作一下，随机数和编的序号都会发生变化，这没关系，咱们要的就是这个效果。

第二步：完成姓名填充在H2处输入公式：=INDEX($B:$B,MATCH(MOD(COLUMN(A1)+4,5)+ROW(A1)* 3-2,$D:$D,))，然后右拉下拉，就可以看到随机分组的结果了。

只要按F9一下，分组名单就会刷新一次。

有没有觉得这个公式很神奇呢？公式里神奇的是MATCH函数当中的这部分MOD(COLUMN(A1)+4,5)+ROW(A1)*3-2，单独提取出来的效果是这样的。

实际上这是用公式构造出的一种数列，原理可以看之前的一篇教程。

☛☛☛☛戳这里本例中是分3组，每组5个人的情况；如果分组情况另有不同的话，就需要修改这部分公式，对于新手来说可能需要时间，没关系，手动填写出一个适合自己需要的数列也不是太难。

但是这个辅助区域就得保留，然后分组结果的公式对应修改为=INDEX($B:$B,MATCH(H10,$D:$D,))注意：MATCH的第一参数就是辅助区域中的第一个数字。

随机分组，你学会了吗？赶紧来试试吧！还没有搞明白的同学，别着急，你可以进群和小伙伴们一起交流、唠嗑、共同进步！。

利用Excel编排累进淘汰赛自动晋级对阵表应广益在累进淘汰赛中，利用Excel电子表格中IF、LOOKUP函数语言编制出程序，自动生成晋级下一轮选手，在比赛管理中操作简单，快速，准确。

一、建立运动员名单工作表打开Excel，建立两个工作表，在把第一个工作表重命名为“运动员名单”，选定运动员名单工作表，在A1、B1中输入“序号”、“姓名”，在姓名中输入参赛运动员名单，按抽签规则抽出运动员的序号，利用排序功能，选择按“序号”升序排列。

如图1二、建立累进淘汰制对阵表（以32人参赛为例）1、自动生成运动员名单（如图2）在第二个工作表中建立累进淘汰制对阵表，合并第一行，输入组别名称，合并A2、A3和B2、B3单元格，选定这两个合并单元格，利用自动填充功能，下拉复制32，在A列2、4格中输入1、2并选中，利用自动填充至32。

在B2格中输入LOOKUP函数“＝LOOKUP(A2,运动员名单！$A$2：$A$33，运动员名单！$B$2：$B$33)”,在B2S格中会自动显示序号1的运动员名单，选定B2，利用自动填充功能，下拉复制至序号32，运动员名单就全部自动显示出来。

2、自动判出晋级选手（如图2以序号1、2为例）（1）、先合并F3、G3、H3要显示序号1、2晋级选手位置，在F3格输入IF函数“＝IF(C3=E3,0,IF(C3>E3,B2,B4))，只要在C3与E3”格输入相应局分，就会自动判出晋级选手。

同样，合并相应表格，并输入IF函数即可。

（2）、到前八名比赛中，负者还要进入副赛，在对阵表下面建立决5－8名对阵表（如图3），在图2中第三轮AC与CF胜者进入前四名，负者进入决5－8名副赛，先在决5－8名对阵表中CF格中，输入第三轮比赛AC与CF比赛IF函数“＝IF(I9=K9,0,IF(I9>K9,I14,I5)),输入AC 与CF比赛局分后系统会自动判出负者到相应位置CF。

同样方法，其他运动员也根据比赛局分到相应位置。

excel 随机分组函数摘要：1.介绍Excel 随机分组函数2.随机分组函数的语法和参数3.随机分组函数的使用方法和示例4.总结随机分组函数的作用和应用场景正文：Excel 随机分组函数是一种在Excel 中实现随机分组的函数，可以帮助用户实现对数据进行随机分组，从而实现更加公平的分组。

在Excel 中，随机分组函数主要包括“RAND()”和“RANDBETWEEN()”函数。

1.介绍Excel 随机分组函数Excel 随机分组函数是一种在Excel 中实现随机分组的函数，可以帮助用户实现对数据进行随机分组，从而实现更加公平的分组。

在Excel 中，随机分组函数主要包括“RAND()”和“RANDBETWEEN()”函数。

2.随机分组函数的语法和参数- RAND() 函数：语法：`=RAND()`参数：无返回值：返回一个大于等于0 且小于1 的随机数。

- RANDBETWEEN() 函数：语法：`=RANDBETWEEN(bottom, top)`参数：- bottom：必需参数，指定随机数的最小值（包括）。

- top：必需参数，指定随机数的最大值（不包括）。

返回值：返回一个指定范围内的随机整数。

3.随机分组函数的使用方法和示例- 使用RAND() 函数：示例：`=RAND()`，返回一个大于等于0 且小于1 的随机数。

- 使用RANDBETWEEN() 函数：示例：`=RANDBETWEEN(1, 10)`，返回一个介于1 和10 之间的随机整数。

4.总结随机分组函数的作用和应用场景随机分组函数在Excel 中有着广泛的应用，尤其是在需要实现随机分组的情况下。

例如，在进行抽奖活动时，可以使用随机分组函数来实现随机抽奖；在进行问卷调查时，可以使用随机分组函数来实现随机抽样。

第二题2.使用RAND函数进行抽样：某公司需要从100名员工中随机抽取10名参加义务植树活动。

现在需要通过EXCEL选择员工的编号，并对员工的编号进行排序，写出结果：(小题解题主要步骤)工具—加载宏—分析数据库,如下图然后点击确定,数据分析选项就会出现在菜单栏的工具下,点击插入—函数—Rand函数,如下图:点击确定,在函数栏输入=RAND()*(100-1)+1,确定即可得一个数值,如选中单元格,右键单击,选择设置单元格格式,如下既得一个随机数值002,拖动填充柄,得到10个数值,再选中者10个数,选择复制,再右键单击,选择选择性粘贴—数值,如下确定,然后排序一下就可以了.3.使用RANDBETWEEN函数进行抽样：某体育彩票进行抽奖，需要从标号00001~99999的消费者中随机抽取10位中奖者，试采用RANDBETWEEN函数随机选中观众的号码，写出结果：(小题解题步骤)插入—函数—RANDBETWEEN,如下点击确定,在出现的参考函数编辑器中输入如下数据,如图:点击确定,右键单击单元格格式步骤如上一题所示,确定.4.利用“随机发生器”进行抽样：某体育彩票进行抽奖，需要从标号00001~99999的消费者中随机抽取10位中奖者，试采用随机发生器随机选中观众的号码，并对号码进行排序，写出结果：(4小题解题步骤:)工具—数据分析—随机数发生器,确定,在弹出的编辑器中输入如下数据:点击输出区域右边的指定10个单元格,确定即可,再将单元格格式设置一下,将得出的10个数值固定,和以上题相同: 确定,排序即可.5.利用抽样宏进行抽样：某图书进行推销活动，从购物清单标号001-100的消费中随机抽取10为幸运者免费赠送作何编号作为签名的图书，使用抽样宏随机抽取出幸运消费则的编号：(5小题解题步骤)先做一个表,利用填充柄会很快.如下图工具—数据分析—抽样:确定.如下图;输入区域为有100个数字的单元格(用鼠标选中即可),输出区域为任意的10个单元格,如图:确定,产生10个随机数,再固定为数值设置数字格式:确定,在排序就可以了.6.利用等距抽样进行抽样：某城市有私营企业300个，拟定样本量为7个，利用等距抽样进行企业营销状况调查，写出抽样结果：(6小题解题步骤)如图,输入一下信息:B3单元格即可得值将B3中的数值调整为整数,利用Round函数: 确定,在弹出的编辑器中进行编辑,结果如下:既得整数43.接下来用ROUNDBETWEEN函数从1-43中选出一个数,作为第一个随机数, 插入—函数—ROUNDBETWEEN如图:确定,在弹出的编辑器中输入一下信息:确定,既得第一个随机数,固定得出的第一个数为数值(方法同上) 在B6单元格输入=B5+B4,如图:将光标放在B4处,按F4键,则出现按回车键,则计算出第一个数,用填充柄进行填充得出七个数设置单元格格式,如图:确定,就可以了.如图:完成.。

巧用Excel实现随机分组2007-05-24 00:40巧用Excel实现随机分组公司有100人，准备随机分为4级参加活动。

按照传统的做法是将每个人的名单打印出来，丢在一个箱子中，然后，几个人进行抽签分组。

浪费纸张和人力不说，将名字切下来的过程很是痛苦，并且，分完组后，还要将名单再做一次整理，麻烦，真麻烦。

爱偷懒的我就想，能不能用计算机帮助分组呢？经过尝试，最终用Excel实现了构想。

以前可能要半天才完成的工作，现在在10分钟内可以轻松搞掂，需要分组的人数越多，其效率越明显。

现说明如下，以供参考。

所用excel函数介绍：1、rand():该函数为产生随机数的函数，产生的随机数为0-1之间。

2、if()：逻辑函数。

3、and()：逻辑运算函数。

4、countif()：统计函数。

以上函数均为Excel本身所带函数，详细帮助可以在Excel中查询得到。

这里不再详述。

只是告诉大家，会用到这几个函数。

怎么用呢？别急，往下看。

实现思路：将需要分组的员工名单放入第一列中，然后，在第二列每位员工后面输入产生随机数的函数，即rand,这样，每位员工都会对应一个由随机函数产生的随机数。

由于我们是需要分4组，而随机数的范围为0-1之间，因此，用该区间跨度除以4，即将0-1的区间分为4等份，可产生4个新的区间，即（0，0.25）（0.25,0.5）（0.5,0.75）（0.75,1）。

聪明的你，应该明白下一步是判断每位员工所对应的随机数落在哪个区间了吧？这时，IF函数，and函数就可组合起来使用对员工所对应的随机数进行判断了，将将判断结果放在第三列中。

那么，countif函数做什么用呢？用它来对第三列的结果进行统计，看分到各个组的人数是多少。

为什么要进行统计呢？因为，rand函数产生的结果，在分布上有可能会不均衡，即，可能会出现某个组的人特别少，某个组的人特别多的情况。

发现这种情况怎么办呢？不要急。

Rand函数会随着整个表格的计算而重新计算。

用Excel实现抽签(有人常问我用EXCEL可不可以随机做一个动态的抽奖或抽签的程序出来，还通俗点讲就是，先把待抽签的人或是抽奖的号放在某个地方，然后在旁边放两个按扭，一个开始，另一个停止。

点开始的时候自动从姓名栏中逐个抽取并显示，点停止的时候停下来，显示的那个名字就是抽到的名字。

我的回答是当然可以，但并不那么简单。

说它不是那么简单，当然是对于那些不太精通EXCEL或是想通过EXCEL 中的公式和函数就想搞定此事的人。

至少目前为止，我还不知道是否能用此来完成这个任务。

因为VBA基本上是单线程的，你一旦调用一个函数，只要它不结束，主画面会被冻结，无法再按其他的按钮了。

说它那么简单，那是因为对于有点了解VBA或是精通它的人来说，稍微动点心思，就成了举手之牢。

现在我们来看看如何实现这个过程，下面我只是举例说明思路，具体地如何调用VBA及其控件，用过的人一定知道！编程思路：首先定义一个全局型的逻辑型变量，在点击开始的时候，把它的值置为“假”，然后进入循环语句，反复的对这个值进行判断，直到它变成“真”为止。

在循环体内，首先是随机从名单中抽取并显示，接下来调用 DoEvents 过程，这是关键和极重要的地方。

点结束对应的代码,这个函数只是把上面所说的那个全局变量置为“真”，这样上面提到的那个函数就会停下来。

示例：Dim StopFlag As Boolean '全局变量Sub end()StopFlag = True '变量置真以停止开始函数运行End SubSub Begin()StopFlag = False '变量置假Randomize '随机数While Not StopFlagCells(2, 2) = rndDoEvents 转交控制权到系统WendEnd Sub本方案实现的重点在于不停的调用DoEvents这个过程。

调这个有什么用呢？原来这个函数的作用在于，暂时中止本线程的执行，去主线程中检索是否有其他要处理的东西。

只需七步，用Excel做一个抽奖小程序！
话不多说，直接开始！
第一步：先把要设置的奖品打出来，如图所示，奖名称可别打错了哦！
第二步：全选“数据”，选择“插入”，选择“饼图”，生成一张饼图
第三步：如图所示，将饼图无用数据清除，并且填充饼图颜色，修改标题
第四步，右键，设置标签格式，若没有此选项的话，先右击添加数据标签即可，然后选中类别名称，
第五步：新建工作表，将饼图复制在新表中，多少个奖品，就复制多少张图表哦，并将每个饼图中的一块填充红色，不要重复哦，不然就有选不中的了，如果是故意的，当我没说，哈哈！
第六步：点击“公式”，先择“定义名称”，修改名称“抽奖大转盘”，然后最重要一步，输入公式“=index(sheet2!$a$1:$f$1,randbetween(1,5))，点击“确定”，
第七步：插入任意图片，然后输入“=抽奖大转盘”，此时抽奖的饼图届面就出来了，按F9测试，随机选中任意一个，OK,大功告成！
感谢小伙伴们的支持，有什么更好玩的，方法，还请大家多多指教，谢谢！有什么需求，也可以提出哦，谢谢！。

用EXCEL2003编写《中小学运动会管理系统》为了提高中小学田径运动会工作效率，减轻广大体育教师的工作负担，我校自2003年以来，加强中小学田径运动会工作管理的信息化研究。

在学校领导的大力支持下，经过全体体育教师的全力合作，开发了《中小学田径运动会管理系统》.这套软件在我校历次运动会的管理工作中，发挥了重要作用，使我们可以快速、准确、高效地完成运动会的各项赛事.经过历次运动会管理工作的检验，我们不断地总结经验，使得这套软件功能更加完善，操作更加方便。

现将这套软件的主要功能介绍如下。

软件封面与主菜单（图1）一．主要功能：1。

自动编写运动会秩序册本系统可以根据运动会报表名提供的运动员名单，自动生成秩序册,供查询或打印。

自动给径赛运动员分组,抽签决定预赛时选手所在的跑道，也同时给田赛运动员排出场顺序。

2。

自动填写比赛记录表本系统可以根据报表名的分组情况和抽签结果自动填写各种比赛记录表。

比赛记录表可以打印，由小组裁判填写，也可以直接填写在电脑上。

运动会报名表缩略图（图2）运动会秩序册缩略图（图3) 3.自动排出决赛名单对于有预赛的项目，如果将预赛成绩直接填写在电脑上,系统将自动排名,决定参加决赛者的名单。

对于径赛而言，还能依据预赛成绩,按竞赛规定自动排出各位决赛选手各自所在的跑道。

男子甲组100米预赛记录表（图4)男子甲组100米决赛记录表(图5）4。

成绩录入智能化本系统根据各竞赛小组提供的决赛成绩记录表输入出电脑，对于一次性的预决赛项目,可以直接在电脑上输入获奖选手的姓名，即可。

在输入运动员成绩时，只须输入选手姓名和成绩这两项,系统将自动填选手所在班级名称，并自动排出名次，根据名次给各位选手自动记分。

对于破记录者,自动标识，按规定给予加分,并将其姓名、班级、成绩和破记录的时间自动填在系统提供的最新记录表中。

在录入径赛成绩时,只须输入整数,系统将自动显示分秒格式.如“1‘12“34”,输入“11234”即可。

EXCEL公式运用一则：随机排序或抽签
先将原序列输入到A列，可以是姓名，也可以是单位等，为了看的更清楚，加一列序号（可以看出重排列后的效果），然后在下一列中输入公式：=RAND()，如下图：
向下填充公式：
然后在第三列里输入公式：=RANK(B2,$B$2:$B$12)，并向下填充，就可以得到随机排列的序号，而且重新计算一次就会改变一次，你要对多少个对象进行排序，就将公式中$B$12中的12改为实际数字。

排列1：
排列2：
这个方法是不是简单实用啊，今年俺单位要组织一次竞赛，领导让俺做一个抽签程序，上面这个虽好，可太简单了，拿不出手，俺正考虑做一个小程序（界面美观，功能全面，先自夸一下），你们谁有这方面的经验，给提点意见。

比如：应该抽几次（先抽出场顺序再根据出场顺序抽签，还是先抽出场顺序再根据出场顺序抽抽签顺序然后再抽签？？晕了没有？？），还有用什么来控制不让抽过的号再出现（方法很多，但不知哪种最好）等等问题。