成都商场因摇奖程序出现问题出现了上千人摇中一等奖，总金额超300万的状况，因为无法给顾客兑奖于是选择了报警，对此你怎么看？

确有其事，事发在双流区的一个商场，本来公布的一等奖一名，结果当天摇出了一等奖千多名，更喜剧的是有人中了七八个奖，若要全部按承诺兑现，得用300多万元，无奈，商场选择报警，停止兑奖，最终商场与得奖者协商，不能按原承诺兑奖，按每人补偿400元购物券兑付，即便如此，商场也要花上几十万，而个别人还不愿意兑购物卷。据说造成如此喜剧，是系统出了故障。

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自学成才，主页有更多精彩内容~

如何看待央视3.15晚会曝光各地“高价”珠宝抽奖骗局？

自古真心留不住，唯有套路得人心。这次中央电视台终于做了一件正经好事，质量问题可以通过法律途径解决，但是曝光骗子的套路才是造福千万家的。

作为做局老司机来看，这个珠宝抽奖的套路，至少已经迭代了4代以上：

第1版：老板跟顾客竟然是同乡，给客人打5折！（顾客：劳资说是山顶洞人，你跟我是同乡？）

第2版：抽奖以后可以以优惠价格购买。

第3版：中奖以后可以免费获得奖品，但是需要支付鉴定费、手工费、工本费等等。

第4版：售货员努力向客户表演出「恭喜您不可思议地中了一等奖，中奖率只有千分之二」，您好厉害，可以用一折购买珠宝。

第4.1版：您这么幸运，请带上这个红绳锁住幸运！（免得同行再骗你一次被你识破）

第4.2版：精心选择看上去就呆呆傻傻特别好骗的客人行骗。这是目标选择。

第4.3版：想让谁中奖，谁就能中奖。（修炼出近景魔术的手法，转移顾客注意力后，把有奖的彩票给到顾客）

在骗子不断实践并不断完善骗人理论的同时，咱们这些老百姓一辈子才能被骗几回？如果存了占便宜的心思，那是一定会被骗的，毕竟骗子的骗人经验已经达到60级，而我们平民的防骗经验还在新手村里……

还有那种找老年人来听养生课，来听课就送鸡蛋，送铁锅的，简直跟活雷锋一样从不利己，专门利人，但一般在一个月后，获得老年人信任后，就开始安排托儿上场表演，安排什么抢购，也是原价9998，现价1688的超值大礼包，能治脑残、脑梗、心脏病、胃癌、肠癌、乳腺癌等等的酵素组合、远红外灯、磁疗床……真的是骗了一个又一个。

不过现在骗术的最高境界，应该是骗到一帮铁杆粉丝，没错，我说的就是钱宝网；张小雷在自首入狱之后，还有一批钱宝网的用户认为政府不该抓张小雷呢。

骗术的至高境界，应该就是基于区块链发行空气币了。连承载共识的商品或服务都没有的空气币，都能让发币者圈到几个亿，简直让人觉得韭菜太多，骗子割不过来；而当政府严格监管时，却还有韭菜认为政府耽误了他们挣钱的机会……

这次给央视点赞。