大家好，我是头条号：Excel自学成才

抽奖A4k$小程序，要求的是结果随机，在Excel里面有Gz.gtVMbUbNiiQ&EtHi*%随机数函数rand()和randb6XLuDx,jg^4#gImQP.IF8mg*qeHtween来进行制作的，我们分三bj3bdaQPLSp#d;EE2种情况来制作，1、单人抽奖，2、多人不重复抽奖，3、内定抽奖

我们首先准备抽奖TBT&ZDi7sVxjFES0Q6tDccEZs9!7Tf的名单，放在A列，这个表格里面有88个人员

1、单人抽奖模式SgOgP^Nvny.w我们在某个空白的单元格中输入m@pATpF公式EoNgqd3TFk8is*xemClC*O5yS

=index(a:a,randbetween(1,#H0;2^Os.5Q4J88))

这个时候，我们按住F9键，屏幕就会滚动起kLEo6W%来，,N8*e;s#K9^松开F9键，就得到了抽奖的结果（如果是笔记本电脑，按FN F9键），抽奖效果如Qc9&SZg;3NmjUU6下所示：

2、多人不重复抽奖我们需要在第2列中输入公式=rQoF!7uvcKkNc&lqOmEfOR.@#d0and()函数，然后向下填充，它会随机的生成Tk,YX.qr^!Ol7NPHGObRyE!0-1之间的随机数

然后我们在中奖名单里面输入公式：=u*0J47MN1#L0clvindexm;ugDOwIC9I(KlPz/!fSeiHdUza:a,rank(b1,b:b))，希望几个人中奖的话，就向下拉eURR5kuDC..ll@LriglOJ动几个U^,$xK@i!CJWjGbSKM单元格，便可以得到不重复的多人中NR7P1opt6OYiUz$we^1V奖抽Z2liAf2V.B,dCQla,Bh*v.奖模式

3、内定抽奖如果希望抽奖的时候，内定抽到自己的话，那么我hz&2nq&8MFS5UeL们可11@vbEVh以借助VBA来实现制作过程如下，首先我们按ATL F11，打开VBFudWcNY8IRoK.567ZNi5RA编辑sq%rr7HISX器，在里面输入如下三个模块的代码

因为在代码中，我们是对D1单元格产Yv9o24OHUR生随机数，所以在表格中，输入的公式是：mA^nH.vcu!=index(a:/EZ5ut5.z@F1Ya,d1)

然后我们插入三个按纽，其中内定的按纽放的隐蔽一点，分别绑定开始，结3mW$*Xemh5BqbN,SWnPot果，内定代码

这个时候就制作完成了，当我们正gYoBdJH0Y*W2TPm8Mn0u常点击开始，结束抽奖时，是正常的

当我们提前^oeQ#WDTPEzY7Z60$vp9@rTnFa点了一下内定按纽之后，再点开始，结束时，抽奖的结果100%是作者本身了

A7OvmR41*5lh#XROoZnW6,YJM因为插入了VBA代码，所以bidLo$Va表格需要另存为一下，将格式更改成xlsm格式的文件。

这就是3个ExceTM%yGFau6Tp6$&&YJ#c#6Xl用来制作抽奖的小程序技巧

头条号：Excel自学成RW^j才，主页有更多精彩内容~

$ft8PUY#.sbP!&wEj#lpd

丙肝是什么病微信交流群,丙肝母婴贴吧

耳鸣微信交流群,全国耳鸣交流群

打呼噜微信交流群,怎么加入陌生微信群

「东莞车迷微信群」求个东莞的大众高尔夫微信群

「聋人微信和扣扣群」微信有聋哑人的群吗

「加入菏泽大型微信群」如何加入菏泽一中高三一部十八班微信群

「启动微信群名软件」微信群怎么设置不让别人改群名？

「微信红包群规则复制」微信红包群规章制度是什么样的？

「微信稀奇古怪总代群」我想在微信上卖稀奇古怪的玩意，一件代发的，不需要加盟费！有的留个

「微信群群主有哪些特权」微信群主有哪些特权？