参加：http://gzxieyun.blog.163.com/blog/static/12122649200911237427572/
在Powerpoint 2007中插入此flash并在全屏时实时显示或者其它：
1 在幻灯片中嵌入.swf 格式Flash 动画
1.1 在功能区显示开发工具
（1）单击″Microsoft Office 按钮″，然后单击″PowerPoint 选项″；（2）单击″常用″， 然后在″PowerPoint 首选使用选项″下，选中″在功能区显示' 开发工具' 选项卡″复选框，单击″确定″。
1.2 在计算机上注册Shockwave Flash Object
必须在计算机上注册Shockwave Flash Object 才能够在演示文稿中播放Flash 文件。若要查看Shockwave Flash Object 是否已注册，请在″开发工具″选项卡上的″控件″组中，单击″其他控件″。如果ShockwaveFlash Object显示在控件列表中，则表示它已在计算机上注册。如果尚未注册，则请
从Adobe 网站上下载最新版本的Flash Player， 以便在计算机上注册ShockwaveFlash Object。
1.3 使用Shockwave Flash Object 的ActiveX 控件在幻灯片中添加.swf格式Flash动画
（1）打开或新建演示文稿，选择欲添加滚动文本框的幻灯片；
（2）在″开发工具″选项卡上的″控件″组中，单击″其他控件″；
（3）在控件列表中，单击″Shockwave Flash 对象″并单击″确定″，然后在幻灯片上拖动以绘制控件；
（4）通过拖动尺寸控点调整控件大小；
（5）右键单击Shockwave Flash
Object，然后单击″属性″；
（6）在″按字母顺序″选项卡上单击名称属性，在其右侧单元格中输入名称，本文使用缺省的ShockwaveFlash1；
（7）在″按字母顺序″选项卡上单击Movie 属性；
（8）在值列（″Movie″旁边的空白单元格）中，键入要播放的Flash 文件的完整驱动器路径，包括文件名（例如D/ 我的Flash 作品/ 小池.swf），或键入其统一资源定位器（URL）；
（9）若要设置有关如何播放动画的特定选项，请执行以下操作，然后关闭″属性″对话框：
①若要在显示幻灯片时自动播放文件，则请将Playing 属性设置为True。如果Flash 文件内置有″开始/倒带″控件，则可将Playing 属性设置为False（本文推荐设置）；
②如果不希望重复播放动画，则请将Loop属性设置为False；
③若要嵌入Flash文件以便与其他人共享演示文稿，请将EmbedMovie 属性设置为True。（要运行Flash 文件，必须在任何运行该演示文稿的计算机上注册Shockwave Flash Object 控件）；
（10）在″幻灯片放映″视图中预览动画：
①在″视图″选项卡的″演示文稿视图″组中，单击″幻灯片放映″或按F5；
②若要退出幻灯片放映并返回到″普通″视图，请按ESC。
2 在PowerPoinpt 中使用Actives 控件控制Flash动画播放
若要实现手动操作flash播放，则进行以下操作，否则以下操作不必要。
2.1 在幻灯片中添加″播放″“暂停”、“前进”、“后退”、“返回”、“结束”命令按钮
（1）激活″开发工具″选项卡；在控制功能组中点选″命令按钮″，然后在屏幕中拖画出按钮显示区域，调整命令按钮大小到合 适尺寸；（2）在右键菜单属性面板中按如下提示设置：①在″名称″单元格的值列中输入cmd_play；②在″Caption″单元格值列中输入″播放″ ；③关闭属性面板；（3）双击按钮，进入VBA 编辑窗口，输入如下内容：
Private Sub cmd_play_Click（）
ShockwaveFlash1.Playing=True
End Sub
Private Sub cmd_pause_Click（）
ShockwaveFlash1.Playing=False
End Sub
Private Sub cmd_forward_Click（）
ShockwaveFlash1.FrameNum = Shockwave-
Flash1.FrameNum+30
ShockwaveFlash1.Playing=True
End Sub
Private Sub cmd_back_Click
ShockwaveFlash1.FrameNum =Shockwave-
Flash1.FrameNum- 30
ShockwaveFlash1.Playing=True
End Sub
Private Sub cmd_start_Click（）
ShockwaveFlash1.FrameNum= 1
ShockwaveFlash1.Playing=True
End Sub
Private Sub cmd_end_Click（）
ShockwaveFlash1.FrameNum = Shockwave-
Flash1.TotalFrames
End Sub
（4）关闭VBA 编辑窗口。
2.2 宏安全性设置
（1）激活″开发工具″选项卡；（2）点击″代码″功能组中的″宏安全性″按钮；（3）将宏安全设置为最低。
3 浏览、保存演示文稿
（1）放映演示文稿，分别点击各命令按钮对Flash 动画播放进行控制；（2） 单击″Microsoft Office 按钮″，单击″保存″；（3）在出现的″另保存″对话框中，根据提示，将演示文稿保存为″启
用宏的PowerPoint 演示文稿（W.pptm）。