用“动作设置”中的“运行宏”来实现看这样的实现效果:1、在同一文件夹下创建两个演示文稿 pp01.ppt、pp02.ppt2、在 pp01.ppt 中插入一个 VBA 模块,将以下代码粘贴进去:VB codeSub toPP02Slide2()Dim thisPP As Presentation, destPP As PresentationSet thisPP = ActivePresentationSet destPP = Presentations.Open(FileName:="pp02.ppt")thisPP.CloseSet thisPP = NothingdestPP.SlideShowSettings.RundestPP.SlideShowWindow.View.GotoSlide 2Set destPP = NothingEnd Sub3、在 pp02.ppt 中插入一个 VBA 模块,将以下代码粘贴进去:VB codeSub toPP01Slide3()Dim thisPP As Presentation, destPP As PresentationSet thisPP = ActivePresentationSet destPP = Presentations.Open(FileName:="pp01.ppt")thisPP.CloseSet thisPP = NothingdestPP.SlideShowSettings.RundestPP.SlideShowWindow.View.GotoSlide 3Set destPP = NothingEnd Sub4、将 pp01.ppt 中的第三张幻灯片标题的“动作设置”设置为“运行宏”-“toPP02Slide2”;将 pp02.ppt 中的第二张幻灯片标题的“动作设置”设置为“运行宏”-“toPP01Slide3”。
5、保存两个文稿,保持其中一个为打开,将另一个关闭进行幻灯片放映,切换到对应的幻灯片并点击标题,PowerPoint 将平滑地在两个演示文稿间进行跳转,就向点击 Web 页当中的超链接一样。