如何使用VBA程序制作随机播放PPT幻灯片

1.如何使用VBA程序制作随机播放PPT幻灯片

1、启动PowerPoint 2013并打开演示文稿，该演示文稿已经完成了标题页的制作和题目的添加。使用技巧429介绍的方法在幻灯片中添加一个按钮控件，并在“属性”面板中更改控件的“Caption”属性值。

2、右击幻灯片中的按钮控件，选择快捷菜单中的“查看代码”命令，在打开的Visual Basic编辑器的代码窗口中输入程序代码。具体的程序代码如下。

01 Private Sub CommandButton1_Click()

02 Dim i As Integer,n As Integer'定义变量

03 i=Int((6*Rnd)+1）'获取1~6间的随机数

04 Randomize'初始化随机数

05 i=Int((6*Rnd)+1）'初始化后再次生成1~6间的随机数

06 n=i+1'向变量n赋值，该值为幻灯片的编号

07 With SlideShowWindows(1)

08.View.GotoSlide n'跳转到指定编号的幻灯片

09 End With

10 End Sub

3、复制标题页中的按钮，将其粘贴到第二张幻灯片中，然后在“属性”面板中更改控件的“Caption”属性值。

4、右击幻灯片中的按钮控件，选择快捷菜单中的选择“查看代码”命令。在打开的Visual Basic编辑器的代码窗口中为按钮添加Click事件响应程序。具体的程序代码如下。

01 Private Sub CommandButton1_Click()

02 With SlideShowWindows(1)

03 .View.GotoSlide 1'跳转到第一张幻灯片

04 End With

05 End Sub

5、将第二张幻灯片中的按钮复制到其后的幻灯片中，使用与步骤④相同的方法为这些按钮添加事件响应程序后，按“F5”键播放幻灯片，在标题页中单击“出题”按钮，PowerPoint将随机跳转到其后的一张幻灯片显示题目；单击题目页中的“回到首页”按钮，如图6所示，将跳转回出题页。

希望通过以上方法步骤大家可以学会制作随机播放PPT幻灯片的方法。

2.如何使用PPT进行随机展示幻灯片

一、导入图片 启动PowerPoint 2002或以上版本，依次选择“插入→图片→新建相册”菜单命令，打开如图1所示的界面。

单击“插入图片来自”下方的“文件/磁盘”按钮，在打开的对话框中，找到存放图片的文件夹，按住Shift键或Ctrl键，将所需要的文件同时选中，单击“插入”按钮。这样，在图1所示对话框中，就可以在“相册中的图片”列表中看到这些图片的名称了。

选中其中的一个，我们可以在右侧的预览框中预览图片。图1 图片在列表中的顺序就是回头放映时的顺序，所以，如果有必要，可以对它们的排序进行适当的调整。

方法是：选中要调整顺序的图片，单击图1中所示的向上箭头或向上箭头，就可以上调或下调顺序了。有必要的话，还可以利用箭头右侧的那些图片调整工具对图片进行翻转、亮度调节或明暗度的调节呢。

至于“相册版式”，咱们还是选中“适应幻灯片尺寸”吧，到时用大屏幕投出来，也比较有震撼力。好了，设置完成，单击“创建”按钮。

PowerPoint会为您创建包含多页的幻灯片文件，每个图片一张幻灯片，另外自动添加一张封面幻灯片。 二、编辑封面设置切换效果 默认的情况下，封面就是一张白白的幻灯片，有名为“相册”的标题和由谁创建的文字，很没有创意。

最起码，咱得给改改背景什么的。首先右击“封面”幻灯片的编辑窗口，在弹出的快捷菜单中选择“幻灯片设计”命令，打开“幻灯片设计”任务窗格。

在列出的设计模板中选择一种合适的，然后单击该模板，将其应用于所有幻灯片。再将标题更改合适，调整文字内容格式至合适，这就不用我多说了吧！ 再依次选择“幻灯片放映→幻灯片切换”菜单命令，打开“幻灯片切换”任务窗格。

在切换方式列表的最下方，选中“随机”，然后调整其下方的切换速度选项、声音效果及换片方式。不要忘了，调整好后，点击“应用于所有幻灯片”按钮。

这样，我们就可以很轻松地为所有的幻灯片添加动态的切换效果了。