首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 办公应用 > OFFICE教程 >

Powerpoint在打开超链接后能否自己结束放映

2012-12-24 
Powerpoint在打开超链接后可不可以自己结束放映Powerpoint在打开超链接后可不可以自己结束放映我想在Power

Powerpoint在打开超链接后可不可以自己结束放映
Powerpoint在打开超链接后可不可以自己结束放映

我想在Powerpoint中放一个按钮达到这样的效果, 链接到另一个powerpoint文档退出放映, 也就是说同时只有一个powerpoint文档是打开的, 请问应该怎么做才行.....
[解决办法]
用“动作设置”中的“运行宏”来实现。看这样的实现效果:

1、在同一文件夹下创建两个演示文稿 pp01.ppt、pp02.ppt。

2、在 pp01.ppt 中插入一个VBA模块,将以下代码粘贴进去:

Sub toPP02Slide2()
    Dim thisPP As Presentation, destPP As Presentation
    Set thisPP = ActivePresentation
    Set destPP = Presentations.Open(FileName:="pp02.ppt")
    thisPP.Close
    Set thisPP = Nothing
    destPP.SlideShowSettings.Run
    destPP.SlideShowWindow.View.GotoSlide 2
    Set destPP = Nothing
End Sub

3、在 pp02.ppt 中插入一个VBA模块,将以下代码粘贴进去:
Sub toPP01Slide3()
    Dim thisPP As Presentation, destPP As Presentation
    Set thisPP = ActivePresentation
    Set destPP = Presentations.Open(FileName:="pp01.ppt")
    thisPP.Close
    Set thisPP = Nothing
    destPP.SlideShowSettings.Run
    destPP.SlideShowWindow.View.GotoSlide 3
    Set destPP = Nothing
End Sub

4、将 pp01.ppt 中的第三张幻灯片标题的“动作设置”设置为“运行宏”-“toPP02Slide2”;
   将 pp02.ppt 中的第二张幻灯片标题的“动作设置”设置为“运行宏”-“toPP01Slide3”。

5、保存两个文稿,保持其中一个为打开,将另一个关闭。进行幻灯片放映,切换到对应的幻灯片并点击标题,PowerPoint将平滑地在两个演示文稿间进行跳转,就向点击Web页当中的超链接一样。

热点排行