Excel制作随机抽取名单

最新推荐文章于 2024-06-18 17:55:03 发布
最新推荐文章于 2024-06-18 17:55:03 发布
阅读量1.7w 收藏 11
点赞数 3
分类专栏： office
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/weixin_38314865/article/details/105960174
版权

首先建立名单，假设放在A列

然后选一个方格用来存抽取结果，并在该方格中输入=INDEX(A:A,RANDBETWEEN(1,8))，1:8表示第1行到第8行

此时按下F9键就可以生成随机的名单了

增加抽取效果：

首先选取全部名单：

点击条件格式→突出显示单元格规则→等于：

在弹出来的方框内选取存放结果的单元格：

抽取的的时候按住F9，松开F9就会停止选取

 

Mr.Jcak
关注
  • 3
    点赞
  • 踩
  • 11
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
用excel随机抽取25个人_进阶必读：加权思维在Excel公式中的应用！
weixin_39950867的博客
12-03 3859
我的目标：让中国的大学生走出校门的那一刻就已经具备这些office技能，让职场人士能高效使用office为其服务。支持我，也为自己加油！有很多同学在后台留言：想学习Excel，该怎么学习？如果他的工作对使用Excel没有提出哪个方面有特殊要求的话，我都会普遍性的告诉他，作为一个经常使用Excel的人士，应该从以下几个方面去学习下Excel：1、熟练掌握下Excel中基本的操作技巧，因为这...
Q768621 PPT VBA 随机抽取人员名单，含作弊功能
07-10
标题中的“Q768621 PPT VBA 随机抽取人员名单，含作弊功能”指的是一款利用Microsoft PowerPoint（PPT）结合VBA（Visual Basic for Applications）编程实现的工具，用于在名单中随机抽取人员，并且包含了作弊功能。...
PPT抽奖程序-名单抽取
08-09
需要调整ppt的 “工具--》宏--》安全性” 设置为低级。 代码如下： Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Dim arrRM, F '输入名单到: TextBox1 采用单个空格分隔，最前和最后一个数据后不要留空格（否则可能部分元素抽出为空） '代码注释部分用于调试，或者你可以修改为其他用途，比如可以显示给用户观看。 Private Sub CommandButton1_Click() If Me.CommandButton1.Caption = "停" Then Me.CommandButton1.Caption = "开始" Call CQ_do("stop") Else Me.CommandButton1.Caption = "停" Call CQ_do("start") End If End Sub Private Sub CQ_do(doTag) Dim I If doTag = "start" Then arrRM = Split(Me.TextBox1, " ", -1, 1) '如果有需要你可以替换这里的空格，改为你需要的分隔符： 如个为英文分号 Split(Me.TextBox1, ";", -1, 1) ' TextBox3 = "" ' TextBox3.Visible = True ' TextBox4.Visible = True ' Me.TextBox4 = UBound(arrRM) & " " & arrRM(0) & " " & arrRM(UBound(arrRM)) F = 0 Do While True Sleep 30 I = Int(((UBound(arrRM) + 1) * Rnd) + 0) ' TextBox3 = TextBox3 & "-" & I TextBox2.Text = arrRM(I) If F = 1 Then Exit Do DoEvents Loop Else F = 1 End If End Sub Private Sub TextBox1_Change() End Sub Private Sub TextBox2_Change() End Sub
excel随机选择数
01-14
excel随机函数使用教程，随机选择人员。excel随机函数使用教程，随机选择人员。
如何用Excel随机抽取幸运儿
最新发布
刘小生Star
06-18 300
如何在群体中随机抽取部分幸运儿的问题？除了抓阄，当然也可以用Excel解决哦，快戳进来
随机抽取各种名单
09-10
随机抽取各种名单，用于分类随机抽取各种名单，用于分类随机抽取各种名单，用于分类
如何在EXCEL表格中随机提取数据
11-24
如何在EXCEL表格中随机提取数据 如何在EXCEL表格中随机提取数据
如何在Excel中根据数量生成抽奖名单
但老师
11-01 2058
文章目录需求背景PowerQuery实现Step 1 将表加载到PowerQueryStep 2 在PowerQuery添加自定义列Step 3 点击箭头,扩展到新行,完成VBA实现实现逻辑VBA代码附录 需求背景 公司会经常筹办一些内促赛,目的是激励销售去创造更多流水.抽奖是常用的以小博大的手段,例如下面方案 在2020年双十一期间,即11月1日-11日24点,销售每成交1单,即获得一份抽奖券.在双十一结束之后,也就是11月12日,将进行iPhone12的抽奖活动,届时,抽奖券的数量将会决定销售的中奖
Excel2003 随机抽取人员名单
08-24
有些时候，部门需要搞什么抽奖活动啦，搞随机抽取人员名单啦……在同等机会面前随机抽取人员！用excel做的，很好玩的，分享给大家 VBA代码，有备注哦！
Excel如何随机抽取姓名
ffcell2016的博客
01-15 5147
​ 如下图是某公司名单，现在想要从中随机抽取四个姓名。 ​ 选中姓名数据所在单元格区域 ​ 点击下图选项（Excel插件，百度即可了解详细的下载安装方法，本文这里不作详细叙述） ​ 点击【随机重复】 ​ 选择【随机抽取】 ​ 设置【抽取个数】为4，然后根据需求选择是否勾选【抽中的单元格置空】，最后点击【确定】 ​ 将存放结果设置为B2单元格，最后点击【确定】即可完成。 ...
Excel如何随机抽取姓名或其他数据
ffcell2016的博客
01-20 2755
如下图A列为某单位员工名单，现在想要从中随机抽取四位员工。 ​ 在A列插入两列辅助列，并在B2单元格输入公式=RAND()并下拉填充到底，然后在C列单元格录入1~4序号。 ​ 在D2单元格输入公式=INDEX($A$2:$A$16,MATCH(SMALL($B$2:$B$16,C2),$B$2:$B$16,0))并下拉填充到底即可完成。 ​ 下面跟大家简单分析一下本文中使用到的函数，首先是RAND函数，它是Excel中产生随机数的一个随机函数。返回的随
利用excel做姓名抽奖工具
xxy_yinji的博客
04-22 797
有时候举行活动，需要做抽奖，那么，一定要用特定的工具才行吗，其实不然，Excel也可以的。 第一步：数据，做抽奖人员的名单。 第二步：利用ran between,有多少个人员就ran dbetween(1,人员总数） 第三步：利用index函数，index(抽奖人员名单区域，ran dbetween公式所在单元格，0) 第四步：美化 第五步：F9按住去抽奖（特意百度了下，mac是fn+F9） ...
Excel2021制作随机抽奖系统.docx
09-26
当你在F2单元格中按下回车键，你会看到一个随机抽取的名字。如果需要再次抽取，只需在F2单元格按F9键，公式会重新计算，显示出新的中奖者。 为了使中奖者更加醒目，我们可以应用条件格式。选中包含所有名字的列（A...
Excel制作的抽奖器
12-09
3. **VBA编程**：利用Excel的VBA编辑器编写宏代码，实现随机抽取中奖者的功能。这通常涉及到VBA的Randomize函数和Rnd函数，用于生成随机数。 4. **界面设计**：可以创建按钮或者用超链接触发抽奖过程，用户只需点击...
年会 抽奖 小程序 EXCEL VBA
01-12
3. **随机抽取**：抽奖过程的关键在于公正的随机性。VBA可以利用随机数生成函数，如`Rnd`，结合数组操作，实现对参与者名单的随机选择，从而决定谁是获奖者。 4. **界面交互**：用户友好的界面设计是提升用户体验的...
如何随机选择excel单元格中的数据
u014484715的专栏
12-15 4461
用户可以要求Excel的随机数生成程序来产生需要的结果，将RAND函数（此功能返回一个从0～l之间的随机数）同INT函数（此功能要求整数而不是小数）及INDIRECT函数（返回一个文本字符串）结合使用，结果就是对单元格引用的随机选择（见图6-53）。 若要对数据列区域，这里为Al：A50中的数进行随机选择，可使用以下公式： =INDIRECT(”A”&INT(RAND()*(50-1)
Excel如何实现随机抽取
ffcell2016的博客
12-04 6375
如下图，某部门有十四名员工，现在想要随机抽取一名员工外出培训。 在C2单元格录入公式=CHOOSE(RANDBETWEEN(1,14),A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15)即可完成。（按F9可以刷新结果。） 下面跟大家简单介绍一下这个公式，首先是RANDBETWEEN函数，它的作用是返回位于两个指定数之间的一个随机整数。 每次计算工作表时都将返回一个新的随机整数。，语法结构是RANDBETWEEN(bottom, top
用EXCLE制作抽奖客户名单操作步骤
Snower_2022的博客
11-16 893
EXCLE远比想象的强大，无需代码即可得到随机抽奖的机会。
45人中随机抽取25人不重复
u013117951的专栏
04-29 579
#include "stdio.h" #define N 25 main() { int i; int j; int temp; int students[N]; for(i=0;i<N;i++){ temp=rand()%45+1; if(i>0){ for(j=0;j<=i-1;j++){ if(temp==students[j]){ temp=ra
excel表格随机抽取姓名
01-27
要在Excel表格中随机抽取姓名，可以使用以下方法： 1. 使用Excel内置函数RAND()和INDEX()结合，可以实现随机抽取姓名的功能。假设姓名存储在A列，可以在B列使用以下公式来实现随机抽取： ``` =INDEX(A:A, RANDBETWEEN(1, COUNTA(A:A))) ``` 这个公式会随机生成一个介于1和A列非空单元格数量之间的整数，并使用INDEX函数返回对应的姓名。 2. 使用VBA宏来实现随机抽取姓名。可以使用以下VBA代码来实现： ```vba Sub RandomName() Dim LastRow As Long Dim RandomRow As Long Dim Name As String ' 获取A列最后一行的行号 LastRow = Cells(Rows.Count, 1).End(xlUp).Row ' 随机生成一个介于1和最后一行之间的整数 RandomRow = Int((LastRow - 1 + 1) * Rnd + 1) ' 获取随机行对应的姓名 Name = Cells(RandomRow, 1).Value ' 在MsgBox中显示随机抽取的姓名 MsgBox Name End Sub ``` 将以上代码复制粘贴到Excel的VBA编辑器中（按下Alt+F11打开），然后运行该宏即可随机抽取姓名。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值