经验直达：
- 手机wps表格怎么制作抽奖
- 如何用WPS的excel表制作摇号抽奖
- 请问如何用wps表格制作随机数
一、手机wps表格怎么制作抽奖
- 第一步：首先我们确定前期的数据，比如说要将最终抽到的奖品的名称显示出来 ， 输入奖品名称 。
请点击输入图片描述
- 第二步：然后制作显示抽奖结果的界面 。
请点击输入图片描述
- 第三步：在抽奖显示框中插入函数一个随机函数randbetween().因为我设置的奖项只有6项，所以取值范围可以设置randbetween(1,6).
请点击输入图片描述
- 第四步：因为要获取奖品的名称，所以需要再插入一个获取索引值得函数index（数据范围，索引值） 。所以我们可以将index函数把随机函数包裹?。?
index（数据范围，randbetween（1,6））
请点击输入图片描述
- 第五步：为了动态显示抽奖的过程，我们可以将奖品名称进行突出显示 。选中所有奖品名称，点击“开始”菜单下的“条件格式”下的“突出显示单元格规则” 。
请点击输入图片描述
- 第六步：在“单元格规则”下选择“等于”，然后用鼠标点击抽奖结果所在单元格，既抽奖结果显示的值和奖品名称比较，如果和抽奖结果一致 ， 则奖品名称突出显示 。
请点击输入图片描述
- 第七步：设置好以后，按住键盘上的F9键执行操作 ， 直到松开F9键，就会产生抽奖结果 。
请点击输入图片描述
- 总结：
1、首先设置好抽奖名称和抽奖显示区域
2、首先在抽奖显示区域插入随机函数randbetween(最小值，最大值)
3、然后在随机函数的外面包裹一个获取索引名称的函数index(数据区域，索引值)
4、为了能够动态显示抽奖的变化状态，设置抽奖名称的突出显示格式
5、既条件就是抽奖结果，过程就是抽奖名称数据区域
6、设置好后，按住F9键进行抽奖 ， 松开按键既停止 。
二、如何用WPS的excel表制作摇号抽奖
先看上面的示例：
在A2至A14列输入所有人名，在B2输入公式：
=RAND()
并下拉拖到B14.
然后在E2中输入公式：
=INDEX($A$2:$A$14,RANK(B2,$B$2:$B$14))
并下拉拖出三行 。
按F9摇奖 ， 单按一次 ， 会随机提取出三个人名 。
如果按下F9不放，就会实现人名滚动的效果，松开F9后人名停止滚动 。
提取出来的人名重复的机率是一亿分之一，一般不会提取到重复人名，
【如何用WPS的excel表制作摇号抽奖 手机wps表格怎么制作抽奖】退一万步讲，如果摇出重复人名，可以放弃这次摇奖，重新按F9摇奖 。
三、请问如何用wps表格制作随机数
这个只能使用VBA程序来实现的，毕竟函数公式的随机函数每次刷新只能执行一次，没法执行找到所需的函数结果的 。
程序代码如下：
Sub RndNumber()
Dim a1, n, x, i, j, k
On Error Resume Next'忽略运行过程中可能出现的错误
Set mysheet1 = ThisWorkbook.Worksheets("Sheet1")
a1 = mysheet1.Cells(1, 1)'定义A1单元格
x = 0
If a1 < 1 And a1 >= 0 Then'如果A1单元格的值>=0且<1 ， 则
Do
x = x1'统计循环次数
i = Rnd()'Rnd随机数为>=0且<1
j = Rnd()
k = Rnd()
n = (ijk) / 3'三个随机数平均值
If n > a1 - 0.005 And n < a10.005 Then'随机数的平均值在A1值的 -0.005，则
mysheet1.Cells(1, 2) = i'写入B1单元格
mysheet1.Cells(1, 3) = j'写入B1单元格
mysheet1.Cells(1, 4) = k'写入C1单元格
Exit Do'退出Do循环
End If
If x > 300000 Then'如果循环次数大于300000，则强制退出，避免死循环
Exit Do
End If
Loop
End If
End Sub
执行结果如下：
