如何用ppt随机抽取人名（如何用ppt随机抽取人名可以指定吗）
- 作者: 郭苏洛
- 来源: 投稿
- 2024-11-21
1、如何用ppt随机抽取人名
如何使用 PPT 随机抽取人名
步骤 1：准备人名列表
创建一个 Excel 工作表，在第一列中输入人名。
保存工作表并将其关闭。
步骤 2：在 PPT 中插入 ActiveX 控件
打开 PPT 幻灯片。
导航至“插入”选项卡 > “其他控件”组。
从列表中选择“Microsoft Excel 控件 16.0”并单击“确定”。
在幻灯片上绘制一个矩形来放置控件。
步骤 3：连接到 Excel 工作表
双击 Excel 控件。
在“源对象”字段中，单击“浏览”并选择先前保存的 Excel 工作表。
步骤 4：自定义 VBA 代码
按 Alt + F11 打开 VBA 编辑器。
在左窗格中导航到“插入”选项卡 > “模块”。
在右窗格中输入以下代码：
Sub RandomizeNames()
Dim randomNum As Integer
Dim rng As Range
' 获取 Excel 工作表中的数据范围
Set rng = ThisDocument.Worksheets(1).UsedRange
' 随机生成一个数字
Randomize Timer
randomNum = Int(Rnd() rng.Rows.Count) + 1
' 返回随机人名
MsgBox rng.Cells(randomNum, 1)
End Sub
步骤 5：运行宏
在 VBA 编辑器中，单击“运行”按钮或按 F5。
一个弹出窗口将显示一个随机选取的人名。
步骤 6：分配给幻灯片
返回 PPT 幻灯片。
右键单击 Excel 控件并选择“对象动作”> “自定义”。
在“动作”字段中，选择“运行宏”。
在“宏名称”字段中，输入“RandomizeNames”。
单击“确定”以保存更改。
现在，每次单击 Excel 控件时，幻灯片上将显示一个不同的随机人名。
2、如何用ppt随机抽取人名可以指定吗
如何用 PPT 随机指定抽取人名
在需要从一群人中随机抽取人名时，PPT 中的“自定义动画”功能可以帮助指定抽取顺序。
步骤：
1. 创建人名列表：在 PPT 中创建一个文本框，输入所有需要抽取的人名。
2. 为每个人名添加动画：选择文本框中的每个名字，然后在“动画”选项卡中单击“添加动画”。选择“强调”或“飞入”等效果。
3. 设置动画触发器：在“触发器”选项卡中，将触发器设置为“单击”。
4. 指定动画顺序：在动画窗格中，右键单击每个动画，然后选择“顺序”。从下拉菜单中选择“指定顺序”，并为每个名字指定一个顺序号。例如，如果要先抽取“张三”，则将“张三”的顺序号设置为 1。
5. 运行幻灯片放映：进入幻灯片放映模式，然后单击空白区域开始抽取。将随机执行指定的动画序列，从而按指定顺序抽取人名。
提示：
为确保随机性，建议使用随机数生成器或类似工具为顺序号生成随机数字。
如果需要多次抽取，请复制人名文本框并为每次抽取创建新的动画序列。
可以使用不同的动画效果和触发器创建更引人入胜的随机抽取体验。
3、ppt如何设置随机抽名字回答问题
如何在 PPT 中随机抽名字回答问题
在互动式演示中，随机抽取参与者姓名来回答问题是一种活跃气氛并促进参与的有效方式。以下是如何使用 PPT 实现这一功能：
1. 准备幻灯片：创建一个新幻灯片，在上面添加一个文本框以输入参与者姓名。
2. 创建自定义动画：选择文本框并选择“动画”选项卡。单击“添加动画”并选择“自定义动画”。
3. 设置触发器：在“自定义动画”窗格中，单击文本框并选择“触发器”选项卡。选择“鼠标单击”触发器。
4. 添加动作：单击“添加动作”按钮并选择“运行宏”。在“宏名称”字段中输入“随机抽取姓名”。
5. 创建宏：保存 PPT 并按 Alt+F11 打开 Visual Basic 编辑器。插入一个新模块并输入以下代码：
```
Sub 随机抽取姓名()
Dim arrName() As String
Dim randNum As Integer
'将参与者姓名存储在数组中
arrName = Split(ActiveSheet.Shapes("文本框 1").Text, ",")
'生成随机数
randNum = Int((UBound(arrName) - LBound(arrName)) Rnd + LBound(arrName))
'显示随机选取的姓名
MsgBox arrName(randNum)
End Sub
```
6. 保存宏：返回演示文稿并单击“运行”选项卡。选择“宏”并运行“随机抽取姓名”宏。
7. 运行演示文稿：在演示文稿模式下，单击文本框中的任意位置以触发宏。PPT 将随机选择一名参与者的姓名并显示在弹出窗口中。
通过执行这些步骤，您可以轻松地在 PPT 中设置随机抽名字回答问题的功能，从而使您的演示更加互动和吸引人。
4、如何用ppt随机抽取人名和姓名
如何使用 PPT 随机抽取人名和姓名
准备阶段：
1. 在 PPT 中新建一个空白幻灯片。
2. 点击“插入”选项卡，选择“形状”，绘制一个任意形状。
3. 在形状中输入需要随机抽取的人名或姓名。
设置触发器：
1. 选中形状，点击“动画”选项卡。
2. 在“高级动画”组中，选择“触发器”>“单击时”。
3. 选择“效果选项”>“动画效果”>“进入”>“飞入”。
添加宏：
1. 按下“Alt+F11”打开 VBA 编辑器。
2. 在“插入”菜单中，选择“模块”。
3. 在代码编辑区中粘贴以下代码：
```vba
Sub RandomizeNames()
Dim rng As Range
Set rng = ActivePresentation.Slides(1).Shapes.Range
If rng.Count > 0 Then
Randomize
rng.Item(Int(Rnd rng.Count) + 1).Select
RandomizeNames = rng.Item(Int(Rnd rng.Count) + 1).Text
Else
RandomizeNames = ""
End If
End Sub
```
使用宏：
1. 返回到 PPT 演示文稿。
2. 选中包含人名或姓名的形状。
3. 在“动画”选项卡中，选择“自定义动画”。
4. 在右侧面板中，选择刚刚创建的动画效果。
5. 点击“动作”按钮，选择“宏”>“RandomizeNames”。
6. 点击“确定”。
操作：
1. 进入幻灯片放映模式。
2. 单击包含人名或姓名的形状。
3. PPT 将随机选择一个姓名并显示在选定的形状中。
