excel表格怎么弄抽奖器

1.怎么用EXCEL作抽奖器

参阅：

1 抽奖我们就以大乐透的形式来讲，在1到37之间选7个数，这7个数就是获奖的数字。

2 这时候我们要用到的公式就是：

=LARGE(IF(MMULT((ROW(INDIRECT($C$37&":"&$E$37))=TRANSPOSE($C$38:$C38))*1,($C$38:$C38)*0+1),,ROW(INDIRECT($C$37&":"&$E$37))),RANDBETWEEN(1,SUM($E$37-ROW()+39)))

这个公式很长，我们在下面的截图中看不全，但是你只要知道就好。这就是我们要的七个获奖数字。

3 如果你想要一组别的获奖数字，就像大乐透的下一期，那你可以把点鼠标左键，选中一个单元格，把鼠标移动到这个单元格的右下角当鼠标的指示变成一个加号的时候你可以向下拖动，这可以生成下一组了

4 这样就生成了，您的摇奖器就生成了。

5 剔除上期开奖号选号

如果是在一个晚会，药分别在晚会中间和晚会结束前，摇两次奖。但幸运观众不能重复获奖。这就要求剔除上期开奖号选号。

6 首先我们用刚才的办法生成一组获奖数字。还是那个公式，就是单元格变化了。

=LARGE(IF(MMULT((ROW(INDIRECT($C$37&":"&$E$37))=TRANSPOSE($F$38:$F38))*1,($F$38:$F38)*0+1),,ROW(INDIRECT($C$37&":"&$E$37))),RANDBETWEEN(1,SUM($E$37-ROW()+39)))

7 这时候我们要用的公式就是：

=LARGE(IF(MMULT((ROW(INDIRECT($C$37&":"&$E$37))=TRANSPOSE($F$38:$F45))*1,($F$38:$F45)*0+1),,ROW(INDIRECT($C$37&":"&$E$37))),RANDBETWEEN(1,SUM($E$37-ROW()+39)))

就是生成公式的变形。

8 这样就能满足两次获奖数字不一样了。

2.用EXCEl做一个抽奖器,每个人输入工号只能抽奖一次,抽奖后回记

1/.在A1:A10区域用=rand（)函数，这里就生成10个小于1的小数。

2/.再在B1:B10区域的B1单元格设置函数=rank(A1,A1:A10)向下复制进行排序，放心，不会有重名的。

3/.在C1:C10输入10个参与抽奖人名。

4/.比喻说只有前三名中奖，在D1:D3输入 1,2,3

5/.在E1:E3中的E1输入函数=vlookup(D1,$B$1:$C$10,2，)向下复制。

这时就简单的抽奖名单制作完成了，E列将显示抽奖结果，每次页面刷新，名单都会发生变化。

3.关于EXCEL制作抽奖

建议用微软的OFFICE，用VBA实现动态效果。

右键sheet1，查看代码。粘贴下面的代码。要抽奖时。按一下按钮。

Sub a()

For i = 1 To 1000

Cells.Interior.ColorIndex = -4142

j = Int(Rnd * 10 + 1) '10列

k = Int(Rnd * 10 + 1) '10行

Cells(k, j).Interior.ColorIndex = 3

Next i

MsgBox "恭喜" & Cells(k, j) & "号中奖！" '消息提示框

End Sub