excel怎么制作抽奖小程序?
合集下载
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
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⽤来制作抽奖的⼩程序技巧。