用excel实现随机抽签
用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怎么制作抽奖⼩程序？
抽奖⼩程序，要求的是结果随机，在Excel⾥⾯有随机数函数rand()和randbtween来进⾏制作的，我们分三种情况来制作，1、单⼈抽奖，2、多⼈不重复抽奖，3、内定抽奖
我们⾸先准备抽奖的名单，放在A列，这个表格⾥⾯有88个⼈员
1、单⼈抽奖模式
我们在某个空⽩的单元格中输⼊公式
=index(a:a,randbetween(1,88))
这个时候，我们按住F9键，屏幕就会滚动起来，松开F9键，就得到了抽奖的结果（如果是笔记本电脑，按FN+F9键），抽奖效果如下所⽰：
2、多⼈不重复抽奖
我们需要在第2列中输⼊公式=rand()函数，然后向下填充，它会随机的⽣成0-1之间的随机数
然后我们在中奖名单⾥⾯输⼊公式：=index(a:a,rank(b1,b:b))，希望⼏个⼈中奖的话，就向下拉动⼏个单元格，便可以得到不重复的多⼈中奖抽奖模式
3、内定抽奖
如果希望抽奖的时候，内定抽到⾃⼰的话，那么我们可以借助VBA来实现制作过程如下，⾸先我们按ATL+F11，打开VBA编辑器，在⾥⾯输⼊如下三个模块的代码
因为在代码中，我们是对D1单元格产⽣随机数，所以在表格中，输⼊的公式是：=index(a:a,d1)然后我们插⼊三个按纽，其中内定的按纽放的隐蔽⼀点，分别绑定开始，结果，内定代码
这个时候就制作完成了，当我们正常点击开始，结束抽奖时，是正常的
当我们提前点了⼀下内定按纽之后，再点开始，结束时，抽奖的结果100%是作者本⾝了
因为插⼊了VBA代码，所以表格需要另存为⼀下，将格式更改成xlsm格式的⽂件。
这就是3个Excel⽤来制作抽奖的⼩程序技巧。
Excel中快速的随机抽取样本的软件操作介绍
Excel中快速的随机抽取样本的软件操作介绍
根据工作需要，我们需要从含有大量数据的工作表中随机的抽取一些样本，如果一个个去挑选的话，实在是太费时费力了，今天，店铺就教大家在Excel中快速的随机抽取样本的软件操作介绍。
Excel中快速的随机抽取样本的软件操作步骤：
首先，我们要下载和安装《慧办公》，支持0ffice2007及以上版本。
打开工作簿，选择【慧办公】→【等距抽样】，如下图。
这里有两种抽样方式，一种是【根据组距抽样】，就是说，隔几行抽取一个或多个样本，一共抽多少个样本不确定，如下图。
另一种方式是【根据样本量抽样】，就是说，要抽多少个样本是确定，抽样的组距是由系统去计算的，如下图。
根据需要选择你需要的方式，设置好条件，点击【确定】即可。
解释：
【颜色标注】是说，将被抽中的样本进行颜色标注，
【导出样本】是说，将被抽中的样本存放到一张新的工作表里面。
随机数字公式excel
随机数字公式excelExcel 中的随机数字公式，那可是个相当有趣且实用的小玩意儿！在日常的工作和学习中，我们经常会需要用到随机数字来进行各种模拟、测试或者随机抽样。
这时候，Excel 里的随机数字公式就派上大用场啦！比如说，咱要模拟一个抽奖活动，从 1 到 100 中随机抽取幸运号码。
这时候，“=RANDBETWEEN(1,100)”这个公式就能轻松搞定。
只要在单元格里输入它，每一次重新计算或者按 F9 键，都会给出一个新的随机数字，是不是超级方便？我记得有一次，公司搞活动，需要随机选出几个员工发放小礼品。
我就用 Excel 的随机数字公式来帮忙。
当时大家都围在我电脑旁边，眼睛紧紧盯着屏幕，那种期待和好奇的眼神，让我觉得这小小的公式瞬间充满了魔力。
当数字一个个跳出来的时候，大家的表情也是五花八门，有惊喜的，有遗憾的，还有满心期待下一轮的。
再比如说，老师在给学生出练习题的时候，想要随机生成一些数值让学生计算，也能用到这个公式。
或者是做市场调研，要从大量的数据中随机抽取一部分进行分析，随机数字公式同样能发挥大作用。
除了“RANDBETWEEN”函数，还有“RAND”函数也能生成随机数字。
不过它生成的是大于等于 0 且小于 1 的均匀分布随机实数。
要是想得到指定范围内的随机数，还得结合一些其他的运算。
就像给一组数据随机排序，先在旁边生成一列随机数，然后按照这列随机数进行排序，就能轻松打乱原来的顺序啦。
还有啊，要是想生成带有小数的随机数，比如在 1 到 10 之间，保留一位小数的随机数，可以这样写：“=ROUND(RAND()*9+1,1)”。
总之，Excel 中的随机数字公式就像是一个神奇的魔法棒，能在各种场景中变出我们需要的随机数字，帮助我们解决好多问题，让工作和学习变得更加有趣和高效。
不管是在学校里，还是在办公室中，只要你能灵活运用这些随机数字公式，就能节省不少时间和精力，创造出更多的可能性。
excel教程年终抽奖必备运用2个函数随机抽取姓名
excel教程年终抽奖必备运用2个函数随机抽取姓名
在前面的课程，我们讲解了运用Excel制作掷骰子游戏，有的小伙伴就在问，可不可以用Excel随机抽取姓名用来抽奖，或者随机出现菜名，来帮助选择困难症的小伙伴，答案是可以的，下面，我们就以随机抽取姓名为例。
1、在A列输入好姓名，B1单元格写好标题，设置好格式（也可以不写，根据具体情况）2、选中B2单元格，输入公式
=INDIRECT('A'&RANDBETWEEN(2,10))其中，A为姓名列的列号，2为姓名开始行，10为姓名结束行3、再修改B2
单元格的样式，并隐藏网格线4、如果不想显示人名，可以选中A列，把名字颜色改为白色5、现在，想要随机出现姓名，只需要按【F9】，每按1次，随机出现1个姓名相关推荐如何用Excel制作1款小游戏？年终必备，掷骰子游戏，建议收藏！~●请大家多多关注、点赞、评论，让我有动力继续更新更多教程●。
excel实现抽签
用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进行随机抽样
用excel进行随机抽样
使用excel进行抽样，首先要对各总体单位进行编号，编号可以按照随机原则，也可以按照有关标志或无关标志进行排队，完成编号后，将编号输入工作表中。
例如：假定有100个总体单位，每个总体单位给一个编号，共有从1到100个编号，输入工作表后，如下图所示。
图1 总体编号图
步骤：
第一步：单击“工具”菜单，再选择“数据分析”选项，打开“数据分析”对话框，从中选择“抽样”，如下图2所示。
图2 “数据分析”工具对话框
第二步：单击“抽样”选项，弹出“抽样”对话框，如图3所示。
图3 抽样选项对话框
第三步：在输入区域框中输入总体单位编号所在的单元格区域，如果输入区域的第一行或第一列为标志项（横行标题或纵列标题），可以选中“标志”复选框。
第四步：在抽样方法项下，有周期和随机两种抽样模式：
“周期”模式即所谓的等距抽样。
“随机”模式适用于纯随机抽样、分层抽样、整群抽样和多阶段抽样。
第五步：指定输出区域，单击“确定”后，即可得到抽样结果。
Excel2020表格中如何模拟一个随机抽奖系统
Excel2020表格中如何模拟一个随机抽奖系统
实例教程
①打开Excel，参与抽奖的人员名单已经制作好了，我们直接在
F2单元格输入：=INDIRECT("d"&INT(RAND()*13+2))
②公式的意义我稍后为大家说明，回车按下，得到一个人员的名字：黄博文。
③选中A：D列，单击菜单栏--条件格式--新建规则选项。
④选择最后一个规则类型，使用公式确定要设置格式的单元格，输入公式：=$D1=$F$2,点击格式按钮。
⑤设置单元格格式，也就是中奖人员在名单册中的现实方式，与其他人进行区分。
⑥完毕，做为恒大勇夺亚冠冠军的一员，黄博文中奖。
我们按下
F9键刷新，就会重新抽奖。
公式说明
int函数返回一个2-14的随机整数，和d串联就会返回D2：D14之间的随机单元格，最后，indirect会返回随机单元格里面的姓名。
猜你喜欢：。
Excel还能随机点名或摇号？简单易学，快来试试吧！
Excel还能随机点名或摇号？简单易学，快来试试吧！我们都知道Excel的函数库非常强大，仍有不少地方需要我们探索！今天小编来教教大家如何使用一个Excel函数就可以制作简易的点名工具，办公小白的老师都能够轻松上手！课堂上随机点名器的功能可是老强大了！不仅可以帮助老师解决点名纠结症，还能活跃班级气氛，让学生保持高度紧张！小编使用Excel自制了随机点名器，效果如下：而且只需要简单的三步就可以完成！再也不用到处找资源下载这些小工具啦！而且自己制作的会更加有成就感呢！具体步骤：1、新建一个Excel表格，复制一份班级学生名单并粘贴。
2、在名单右侧，或另建一个Sheet表建立一个文本框并输入函数"INDEX(A2:A12,RANDBETWEEN(1,11))"，如下图所示。
其中，INDEX函数是返回表或区域中的值或值的引用。
RANDBETWEEN是返回位于两个指定数之间的一个随机整数。
3、每次只需点击F9即可刷新，获取新数据。
怎么样！是不是超级简单！小编没有骗人！老师们学会了吗？你以为今天的文章就此结束了吗？那当然不是啦！小编还要给大家递上一个Excel摇号工具！效果图：特点：1、只需复制粘贴名单，点击“快摇抽签”即自动生成名单。
2、自动生成记录名单，不用害怕丢失。
3、小编已经制作打包好，大家只需下载解压就可以使用啦！使用说明：1、如果使用office2003及其以上版本的Excel，打开“抽签摇号神V2.0.xls”，将宏安全性设为“低”，然后关闭Excel，再重新打开抽签摇号神器V2.0.xls，就可使用。
2、office2016及其以上版本可使用“抽签摇号神器V2.0.xlsm”。
EXCEL公式运用一则：随机排序或抽签
EXCEL公式运用一则：随机排序或抽签
先将原序列输入到A列，可以是姓名，也可以是单位等，为了看的更清楚，加一列序号（可以看出重排列后的效果），然后在下一列中输入公式：=RAND()，如下图：
向下填充公式：
然后在第三列里输入公式：=RANK(B2,$B$2:$B$12)，并向下填充，就可以得到随机排列的序号，而且重新计算一次就会改变一次，你要对多少个对象进行排序，就将公式中$B$12中的12改为实际数字。
排列1：
排列2：
这个方法是不是简单实用啊，今年俺单位要组织一次竞赛，领导让俺做一个抽签程序，上面这个虽好，可太简单了，拿不出手，俺正考虑做一个小程序（界面美观，功能全面，先自夸一下），你们谁有这方面的经验，给提点意见。
比如：应该抽几次（先抽出场顺序再根据出场顺序抽签，还是先抽出场顺序再根据出场顺序抽抽签顺序然后再抽签？？晕了没有？？），还有用什么来控制不让抽过的号再出现（方法很多，但不知哪种最好）等等问题。
用excel实现随机抽签
用excel实现随机抽签先看看程序运行情况：将数据复制粘贴进去，点开始开始生成数据，停止产生结果。
实现代码Dim i, j, k As IntegerDim Flag As BooleanDim str$Sub 按钮1_Click()Flag = FalseIf Cells(1, 1) = "准备就绪" ThenCells(1, 1) = "正在生成"Do Until FlagCall dorndDoEventsLoopEnd IfEnd SubSub dornd()i = getcellFor j = 1 To iCells(j + 2, 1) = ""Nextj = 1Do Until j > i Or j = 10000k = Int(Rnd(j / 10) * (i) * 10)If k < i And Cells(k + 3, 1) = "" ThenCells(k + 3, 1) = jj = j + 1End IfLoopEnd SubFunction getcell()i = 3Do While (Cells(i, 2)) <> ""i = i + 1Loopgetcell = i - 3End FunctionSub 按钮11_Click()Cells(1, 1) = "准备就绪"Flag = TrueMsgBox ("已确定随机顺序")str = "A2:Z" & getcell + 2 & ""Range(str).Select'excel 2003Selection.Sort Key1:=Range("A3"), Order1:=xlAscending, Header:=xlYes, _OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _:=xlPinYin, DataOption1:=xlSortNormal'excel 2007'ActiveWindow.SmallScroll Down:=-18'ActiveWorkbook.Worksheets("excel程序随机抽签").Sort.SortFields.Clear'ActiveWorkbook.Worksheets("excel程序随机抽签").Sort.SortFields.Add Key:=Range("A2") _' , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal'With ActiveWorkbook.Worksheets("excel程序随机抽签").Sort' .SetRange Range(str)' .Header = xlYes' .MatchCase = False' .Orientation = xlTopToBottom' .SortMethod = xlPinYin' .Apply'End WithEnd SubSub Macro1()'' Macro1 Macro' 宏由微软中国录制，时间: 2011-10-19''Range("F14:J20").SelectSelection.Sort Key1:=Range("F14"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _:=xlPinYin, DataOption1:=xlSortNormalEnd Sub不用你自己编写了，下载吧。
怎样在excel制作一个用于抽签函数
怎样在excel制作⼀个⽤于抽签函数怎样在excel制作⼀个⽤于抽签函数，别的⼯具也⾏
假设A列是顺序号1、2、3、4、5
B列是⼈名A、B、C、D、E
可在C1输⼊=vlookup(randbetween(1,5),A:B,2,)
然后按F9 每按⼀次都会随机出⼀个⼈名
⽅法/步骤
1. 1
新建⼀个空⽩excel表格
2. 2
选中多个单元格，并进⾏合并居中（本步骤可以省略）
3. 3
选中单元格，输⼊公式=INT(RAND()*(100-1+1))+1，按回车键确认
【温馨提⽰】
1.记住连同=号⼀起输⼊；
2.如果是在1-50中抽取，则将公式中100替换成50，以此类推。
4. 4
选中单元格，在“开始”选项卡中进⾏字体⼤⼩调整
5. 5
按键盘F9键进⾏刷新，即每按⼀次F9将出现新数字
【温馨提⽰】
长按F9有数字滚动的效果哟~
END
注意事项
本公式在N次刷新中，可能出现重复的数字?希望喜欢的可以收藏跟投票哟~。
一起制作Excel版简易抽奖器
一起制作Excel版简易抽奖器
话说某公司开年会，现场举行一次抽奖环节，要从50个人中抽取10个幸运者，要求每个姓名只能出现一次。
职工名单如下图所示：在Excel中制作随机抽奖的效果，核心是生成一组随机不重复值。
首先在B2输入以下公式，向下复制至B51单元格：
=RAND()
RAND函数的作用是生成介于 0 到 1 之间的随机数。
接下来在D2单元格输入以下公式，向下复制到D11：=INDEX(A$2:A$51,RANK(B2,B$2:B$51))
简单说一下公式的意思：先来看这部分：RANK(B2,B$2:B$51)RANK函数对B2:B51单元格产生的随机数字排序，相当于生成了随机的1-50的数字。
INDEX函数的作用是根据指定的位置信息，返回某个单元格区域中对应位置的内容，本例中的位置信息就是RANK函数的运算结果。
因为B列的数字是完全随机的，所以任何数字出现在前10行的概率都相同。
好了，接下来按住F9键不放，就可以进入激动人心的抽奖环节了：
注意，抽奖结果生成后不能再进行编辑公式或是双击等激发重新计算的动作，否则抽奖结果会发生变化。
作者：cleverzhzhf。
用excel进行随机抽样
用excel进行随机抽样在Excel中进行随机抽样可以通过使用函数和工具栏进行操作。
下面我将详细介绍两种方法：使用“抽样”工具栏和使用“INDEX”函数。
方法一：使用“抽样”工具栏1.打开Excel，并打开你的数据表格。
确保你的数据是按照行排列的，即将数据从上到下排列。
2.单击“数据”菜单，然后选择“数据分析”。
如果你没有看到这个选项，可能需要先安装“数据分析”插件。
3.在弹出的“数据分析”对话框中，选择“抽样”工具，然后单击“确定”。
4.在弹出的“抽样”对话框中，选择你想要进行抽样的数据范围。
可以选择整个表格，也可以选择特定的行或列。
5.在“抽样方法”下拉菜单中，选择“随机抽样”。
6.如果需要，可以在“替换”选项中选择是否替换已抽取的样本。
7.单击“确定”，Excel将会随机抽取一定数量的样本，并将结果显示在新的单元格中。
方法二：使用“INDEX”函数1.打开Excel，并打开你的数据表格。
确保你的数据是按照行排列的，即将数据从上到下排列。
2.在你想要显示样本的位置输入以下公式：“=INDEX(A1:A100,RANDBETWEEN(1,100))”，其中A1:A100是你的数据范围，RANDBETWEEN(1,100)将随机生成1到100之间的数字，作为抽取样本的索引。
3.这个公式将会显示在你的表格中，它会在A列中的每一行随机抽取一个单元格的值。
你可以根据需要修改公式的参数来调整数据范围和抽取样本的数量。
需要注意的是，在使用以上两种方法进行随机抽样时，如果数据范围过大或者需要抽取的样本数量过多，可能会耗费较长的时间和计算资源。
如果遇到这种情况，可以考虑分批进行抽样或者使用更高效的数据分析工具。
大公司年会都在用的Excel抽奖模板，姓名和照片都会随机跳动
大公司年会都在用的Excel抽奖模板，姓名和照片都会随机跳动值此年会季，教大家做一个随机滚动出现人名和照片的抽奖器。
写了这么多抽奖模板的做法，这一款是绝对是为年会量身定制的刚需品。
案例：制作如下图所示的年会抽奖模板：按住F9，姓名和照片开始随机跳动；放开 F9，得到抽奖结果。
解决方案：先制作抽奖数据库，在 Sheet1 中，将所有抽奖池中的姓名和照片都输入到数据表中。
1. 在 A1 和 B1 分别输入表头 --> 选择菜单栏的“插入”-->“图片”2. 在弹出的对话框中选择所有人员的照片 --> 点击“插入”3. 根据照片大小，适当调整需要放置照片的单元格尺寸4. 将第一张照片拖动到 B2 单元格5. 按F5 --> 在弹出的对话框中点击“定位条件”-->“对象”-->“确定”，即可选中所有照片6. 选择菜单栏的“格式”-->“对齐”-->“左对齐”7. 将任意一张照片拖动到 B 列中需要放置照片的最后一个单元格8. 再次按F5 --> 在弹出的对话框中点击“定位条件”-->“对象”-->“确定”，选中所有照片9. 选择菜单栏的“格式”-->“对齐”-->“纵向分布”所有照片都在 B 列中上下左右对齐，均匀排列好了。
10. 在 A 列中输入对应的姓名11. 选择另一个工作表 Sheet2 作为抽奖工作表，将表头复制粘贴过来，照片单元格同样调整到适合照片大小的尺寸。
12. 在 A2 单元格中输入以下公式：=INDEX(Sheet1!$A$2:$A$11,RANDBETWEEN(1,COUNTA(Sheet1!$A$2:$A$11)))公式释义：•COUNTA(Sheet1!$A$2:$A$11)：统计数据库表中的姓名个数，即总共有几个人参与抽奖•RANDBETWEEN(1,...)：生成一个 1 到总人数之间的随机整数•INDEX(Sheet1!$A$2:$A$11,...)：查找姓名列，返回随机数所在的第 n 行单元格的值现在按住 F9，姓名就会随机跳动；放开 F9，停止跳动。
小技巧丨用Excel函数做个抽签抓阄表
⼩技巧⼁⽤Excel函数做个抽签抓阄表已获授权转载今天，我和我的⼩伙伴们⼀起在路上⾏⾛，⾛着⾛着，突然⼤家的⽬光全部盯在了路上的⼀个⼩圆点上，那是：1块钱！1块钱啊！算谁的呢。
当然谁先看见的归谁？但是哪⾥说得清。
就快要打起来的时候，机智的我说：要不我们抽签吧，抽到谁归谁。
看来只有这最公平了。
嗯，于是我打开Excel，拿出了这个幸运之星转盘。
在⼩伙伴赞赏的⽬光中，决定了那1块钱最终的归属。
我也⼼满意⾜地笑了。
那这个⽤Excel到底是如何做到的？我来分解⼀下动作吧，说不定什么时候你也会需要呢。
所涉及函数拆解1rand函数这是⼀个随机函数。
在单元格中输⼊“=rand()',回车之后，会⾃动⽣成⼀个0到1之间的任意⼀个⼩数。
按下键盘上的F9键，数字会随机变化。
2index函数这是⼀个引⽤函数。
它包含了三个参数。
第⼀个参数，是引⽤范围；第⼆个参数是⾏号，第三个参数是列号。
也就是说，这个函数计算的结果，是所选范围内，⾏号和列号确定对应的那个值。
举个栗⼦：图中，所引⽤的值是，在A1：A11范围内，第4⾏第1列的值，也就是显⽰结果“墨边锦”。
3rank函数这是⼀个排序函数。
它也包含了三个参数：第⼀个是待排序的数字。
第⼆个是排序的范围。
第三个参数，是排序规则，0代表降序，就是从⼤到⼩，最⼤值排名第⼀；1代表升序，即从⼩到⼤，最⼩值排名第⼀。
范围内所占的位次位次。
待排序数字在这个范围内函数计算结果，就是待排序数字举个栗⼦：图中选择的数字为G9单元格，即数字12，范围G8：G14，也就是12在这些数字中所占的位次，排序规则为降序，12是这⾥⾯第三⼤的数字，所以结果显⽰为3。
理解了这三个函数之后，下⾯就是产⽣化学反应的时间了。
1.在所有名单后⾯，输⼊⼀个随机函数。
2.在结果显⽰栏输⼊引⽤公式这⾥⽤了公式的嵌套。
在index的函数的第⼆个参数⾥，⽤了rank函数。
因为有随机函数的存在，因此排名就是随机发⽣变化的，于是显⽰结果也就完全随机。
用excel表格软件抽签
警察3 |玩家3 | 0.867086295
杀手1 |玩家4 | 0.895571743
杀手2 |玩家5 | 0.869936504
杀手3 |玩家6 | 0.280459797
医生|玩家7 | 0.687502351
|玩家8 | 0.303730142
|玩家9 | 0.669669861
就是用பைடு நூலகம்xcel表格软件抽签,其实很简单。
第一步,在表格A列写好特殊职业,如:
警察1
警察2
警察3
杀手1
杀手2
杀手3
医生
规则中规定了多少特殊职业,就在第一列写多少个.
第二步,在职业这一列相邻的B列里输入玩家名字。注意，可以把玩家名字在写字板里写好，每个名字占一行，复制到excel表格里，就自动填好了。填好的excel表格现在是这样：
|玩家10 | 0.395552728
第四步，选中B列和C列，从excel主菜单选中：数据->排序，然后在弹出窗口的“主要关键字”一栏选中“C列”，这时B列就会随机排序：
警察1 |玩家7 | 0.550782691
警察2 |玩家10 | 0.721722402
警察3 |玩家1 | 0.070583544
A列| B列
警察1 |玩家1
警察2 |玩家2
警察3 |玩家3
杀手1 |玩家4
杀手2 |玩家5
杀手3 |玩家6
医生|玩家7
|玩家8
|玩家9
|玩家10
第三步，在B列右侧的C列，每个格都输入"=rand()"（没有引号）
这样会在c列生成一组随机数，如下：
A列| B列| C列
excel抓阄公式
excel抓阄公式
抓阄是一种随机分配的方式，通常用于决定参加活动的顺序、抽奖等。
在Excel中，我们可以通过使用RAND和RANK函数来实现抓阄功能。
首先，在需要进行抓阄的单元格中输入RAND()函数，表示随机生成一个0到1之间的数字。
例如，在A2单元格中输入=RAND()。
接下来，我们需要确定每个参与者的序号，可以在B列中输入1、2、3……一直到抓阄人数对应的数字。
例如，在B2单元格中输入1，在B3单元格中输入2。
然后，在C列中输入RANK函数，用于将RAND函数生成的随机数字按大小排序，并与B列中的序号对应。
例如，在C2单元格中输入=RANK(A2,$A$2:$A$n)，其中n为抓阄人数对应的行数，$A$2:$A$n 表示需要排序的单元格范围。
最后，在D列中输入抓阄结果的公式，将C列中的数字与对应的参与者姓名匹配。
例如，在D2单元格中输入
=INDEX($E$2:$E$n,MATCH(B2,$C$2:$C$n,0))，其中$E$2:$E$n表示参与者姓名的单元格范围。
通过以上步骤，我们就可以使用Excel公式进行抓阄了。
- 1 -。
随机抽取相关人员参加活动，在Excel中如何实现？
随机抽取相关人员参加活动，在Excel中如何实现？实际的工作中，随机选取相关人员的活动很多，除了传统的“抓阄”之外，在Excel中有没有办法实现“抓阄”的功能呢？一、效果展示。
从效果图中可以看出，“名单”是随机产生的，而且每次产生的都不一样，那么，该如何去完成此过程了？二、必备函数简介。
1、Index函数。
作用：返回指定区域中，行列交叉处的值或引用。
语法：=Index(单元格区域，行，[列])。
当“列”省略时，默认为第一列。
目的：返回B2:C9范围内第4行第1列的值。
方法：在目标单元格中输入公式：=INDEX(B2:C9,3,1)。
2、Match函数。
作用：返回指定值在相对范围中的位置。
语法：=Match(定位的值，定位的范围，定位模式)。
定位模式有：-1、0、1三种，分别为：-1：查找大于或等于“定位的值”的最小值。
0：精准定位。
1：查找小于或等于“定位的值”的最大值。
目的：返回指定人员的相对位置。
方法：在目标单元格中输入公式：=MATCH(F3,B3:B9,0)。
3、Small函数。
作用：返回数组中第K个最小值。
语法：=Small(数组范围，K）。
目的：返回指定范围内的最小值。
方法：在目标单元格中输入公式：=SMALL(C3:C9,F3)。
4、Large函数。
作用：返回数组中第K个最大值。
语法：=Large(数组范围，K)。
目的：返回第K个最大值。
方法：在目标单元格汇总输入公式：=LARGE(C3:C9,F3)。
5、Rand函数。
作用：返回大于等于0且小于1的随机数。
语法：=Rand()。
目的：随机生成大于等于0且小于1的随机数。
方法：在目标单元格中输入公式：=RAND()。
三、制作过程。
1、完善表格，添加辅助列并生成随机值。
方法：在目标单元格中输入公式：=RAND()。
2、“抓阄”或随机产生相关人员。
方法：在目标单元格中输入公式：=INDEX(B:B,MATCH(SMALL(C:C,F3),C:C,0))。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
用excel实现随机抽签
先看看程序运行情况：将数据复制粘贴进去，点开始开始生成数据，停止产生结果。
实现代码
''''''''''''''''''''''''''''''''''''''''''''''''''''''
' 程序制作：江西生物科技职业学院'
' 真随风'
' 2011-10-18 '
''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim i, j, k As Integer
Dim Flag As Boolean
Dim str$
Sub 按钮1_Click()
Flag = False
If Cells(1, 1) = "准备就绪" Then
Cells(1, 1) = "正在生成"
Do Until Flag
Call dornd
DoEvents
Loop
End If
End Sub
Sub dornd()
i = getcell
For j = 1 To i
Cells(j + 2, 1) = ""
Next
j = 1
Do Until j > i Or j = 10000
k = Int(Rnd(j / 10) * (i) * 10)
If k < i And Cells(k + 3, 1) = "" Then
Cells(k + 3, 1) = j
j = j + 1
End If
Loop
End Sub
Function getcell()
i = 3
Do While (Cells(i, 2)) <> ""
i = i + 1
Loop
getcell = i - 3
End Function
Sub 按钮11_Click()
Cells(1, 1) = "准备就绪"
Flag = True
MsgBox ("已确定随机顺序")
str = "A2:Z" & getcell + 2 & ""
Range(str).Select
'excel 2003
Selection.Sort Key1:=Range("A3"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
'excel 2007
'ActiveWindow.SmallScroll Down:=-18
'ActiveWorkbook.Worksheets("excel程序随机抽签").Sort.SortFields.Clear
'ActiveWorkbook.Worksheets("excel程序随机抽签").Sort.SortFields.Add Key:=Range("A2") _
' , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
'With ActiveWorkbook.Worksheets("excel程序随机抽签").Sort
' .SetRange Range(str)
' .Header = xlYes
' .MatchCase = False
' .Orientation = xlTopToBottom
' .SortMethod = xlPinYin
' .Apply
'End With
End Sub
Sub Macro1()
'
' Macro1 Macro
' 宏由微软中国录制，时间: 2011-10-19
'
'
Range("F14:J20").Select
Selection.Sort Key1:=Range("F14"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
End Sub
不用你自己编写了，下载吧。