ppt如何制作随机抽取名字 如何用ppt制作随机抽取

如何用ppt制作随机抽取

制作随机抽取可以使PPT更加生动有趣,我们可以通过PPT自带的功能来实现 。以下是操作流程:
1. 首先,打开PPT软件 , 进入“插入”选项卡,点击“形状”按钮,选择一个图形作为可点击的按钮 。
2. 将图形复制多份,每个图形写上不同的数字或者字母,这些将会被随机抽选到 。
3. 在“开发工具”选项卡中,点击“宏”按钮,弹出新窗口,选择“新建” 。
4. 在代码编辑器里 , 输入如下代码:
Sub RandomSelect()Dim index As Integerindex = Int(Rnd * ActivePresentation.Slides(1).Shapes.Count)1ActivePresentation.Slides(1).Shapes(index).SelectEnd Sub
代码中的“Slides(1)”代表第一张幻灯片,如果你需要在多个幻灯片中进行随机抽?。?需要更改对应数字即可 。
5. 点击“保存”按钮,起个名字保存 。
6. 回到幻灯片中,在刚才选择的按钮图形上右键选择“分配宏”,在下拉框中找到你刚才保存的宏,选择并保存 。
7. 点击“视图”选项卡,选择“幻灯片放映”,测试一下随机抽取是否可以正常运行 。
通过以上步骤 , 我们就可以轻松制作一个随机抽取PPT 。使用时只需要在展示PPT过程中点击按钮随机抽取的功能即可,可以让PPT更加生动有趣 。

ppt如何制作随机抽取名字

为了在PPT中制作随机抽取名字的功能,你需要了解两个主要的步骤:第一步是将名字列表输入PPT,第二步是在PPT中使用随机函数,来随机抽取名字 。
第一步:将名字列表输入PPT
首先,你需要在PPT中创建一个文本框,命名为“名字列表” 。然后 , 你可以选择复制粘贴一份名字列表 , 或手动输入名字 。输入完毕后 , 需要将每个名字分别放在一行上,这样在后面抽取名字时,在同一行上就只会出现一个名字 。
第二步:使用随机函数抽取名字
接下来,你需要使用随机函数在PPT中抽取名字 。在PPT中,选择你希望抽名字出来的位置(比如一页PPT,左上角),然后按下快捷键“Alt F11”,打开Visual Basic Editor 。
在Visual Basic Editor中,你需要在代码区域中输入以下代码:
```Sub Shuffle()
Dim num As IntegerDim arr() As VariantDim i As Integer, j As IntegerDim temp As VariantDim counter As Integer
'define the number of namesnum = 10
'redefine the range as a matrix of size num x 1 with values from the Names columnarr = Application.WorksheetFunction.Index(ActivePresentation.Slides(1).Shapes("NameList").TextFrame.TextRange, 0, 1)
'shuffle the namescounter = num - 1For i = counter To 1 Step -1j = Int(Rnd() * (i1))temp = arr(i, 1)arr(i, 1) = arr(j, 1)arr(j, 1) = tempNext i
'display the resultsMsgBox "And the winner is: " & arr(1, 1)
End Sub```
上述代码使用了VBA中的Rnd函数(随机函数),将名字列表进行随机排序,最后输出随机抽取的名字 。你可以根据需要修改代码中的num值,以确定要抽取的名字数量 。
接下来,保存好代码,并退出Visual Basic Editor 。然后回到PPT,并选中你希望显示抽取的名字的位置(比如刚才选的左上角),键入“Ctrl M”,打开添加动作框,选择“运行宏” , 并选择你刚才编写的宏 。
现在,你已经成功地在PPT中制作了“随机抽取名字”的功能 , 可以通过点击指定位置运行宏来使用该功能 。

ppt如何制作随机抽取图片

制作ppt随机抽取图片 , 我们需要使用两个工具:PowerPoint和Excel 。
1. 在Excel中输入图片列表 。
首先我们需要在Excel表格中输入我们要抽取的图片名称或者路径 , 可以按任意顺序排列,如下图所示 。
2. 为Excel表格中的图片添加链接 。
选中Excel表格中的图片名称,右键选择“链接”,再在“链接到”中选择“文件” , 并打开对应的图片文件 , 然后点击“确定”,完成图片和它的链接的绑定,如下图所示 。
3. 在PowerPoint中插入Excel表格 。
在PowerPoint中创建一个新的幻灯片,并插入前面创建好的Excel表格 , 如下所示 。
4. 在PowerPoint中设置“宏” 。
在PowerPoint中 , 我们需要先打开“开发人员”选项卡 。选择“文件” -> “选项” -> “自定义功能区” -> 勾选“开发人员”后 , 点击“确定”即可 。
接下来,我们需要在PowerPoint中设置一个“宏”,具体操作步骤如下:
点击“开发人员”选项卡中的“宏”,如下所示 。
在打开的“宏”编辑窗口中输入下面的代码:
Sub randomPick()Dim randomrow As IntegerDim table As ObjectSet table = ActivePresentation.Slides(1).Shapes("Table 4").Tablerandomrow = Int((table.Rows.Count) * Rnd()1)ActivePresentation.Slides(1).Shapes("Table 4").Table.Rows(randomrow).Cells(1).Shape.Fill.UserPicture _filenamewithpath:=table.Rows(randomrow).Cells(2).Shape.LinkFormat.SourceFullNameEnd Sub
注:代码中表格名称以及单元格范围需要根据实际情况进行更改 。
5. 在PowerPoint中创建按钮 。
我们需要在PowerPoint中创建一个按钮,用于触发“宏”的执行 。具体操作步骤如下:
选择“开发人员”选项卡中的“插入”,在“表格和选择框”下选择“形状” -> 矩形 , 如下所示 。
在“新建形状”中选择矩形,然后在幻灯片中绘制一个矩形按钮 。
在矩形按钮上添加文本,如“随机抽取一张图片” 。
6. 为按钮添加宏 。
选中刚才创建的按钮,在“开发人员”选项卡中选择“属性”,将“宏”设置为我们刚才创建的“randomPick”宏,如下所示 。
7. 运行随机抽取图片的“宏” 。
点击刚才创建的按钮 , “宏”即可开始执行 。每次点击按钮,都会随机抽取Excel表格中的一张图片,显示在PowerPoint幻灯片中,如下图所示 。
【ppt如何制作随机抽取名字 如何用ppt制作随机抽取】至此 , 我们已经实现了通过PowerPoint随机抽取Excel表格中的图片的效果 。

相关经验推荐