快速提取PPT中嵌入的视频和SWF文件的方法
PPT如何快速提取图片
PPT如何快速提取图片
看到别人的PPT 各种精美，想把背景装饰素材图片好看的都提取出来，如果ppt张页比较少，还是可以自己一个一个图片复制出来。那如果多了呢?那需要怎么办呢?下文就让小编跟大家讲讲PPT中是怎么快速提取图片。PPFra bibliotek快速提取图片的方法
把ppt文件的后缀格式改为“.rar”，然后使用解压软件将其解压开来，在文件夹中就可以很轻松的看到所有原ppt中的图片了，方便得很!
几种从powerpoint提取flash的方法
几种从powerpoint提取flash的方法从网上搜到几种从powerpoint提取flash的方法，准备一一试验一下再作汇报。
[1] 在编辑状态下，复制该动画，然后直接粘贴到你想要的位置[2] UltraEdit－32软件[3] 提取PPT中的flash文件,我认为很简单的,只要把PPT存为htm文件,然后,会多出一个文件,所有的资源都在那个文件中,自动去找吧,文件名可能和先前的不同.用这种方法,可以提取声音等,一切要提取的都能提取出来.[4] 1、先将嵌入了flash资源的PowerPoint课件发布成pps放映文件；2、下载一个叫“flash吸血鬼”的软件，并安装；3、播放pps文件，一定要播放到有flash资源的地方，不要关闭；4、将flash吸血鬼打开，将其中的定位器（圆形图标工具）拖入pps的窗口，则其中的flash 很快就会吸出来；5、若flash吸血鬼是未注册版本，则吸出来的swf文件中会带有flash吸血鬼的软件图标(其实是个flash按钮)，可再使用“flash橡皮擦”这个软件将其清除掉。
用flash吸血鬼这个软件还可吸出其它可执行文件如authorware等中的flash文件，[5] PPT文件Flash提取器本程序用于从PowerPoint文件(PPT)提取Flash文件。
部分PPT文件内含Flash文件片，但是无法直接将这些Flash文件提取出来，本程序可以将这些PPT文件中内含的Flash文件提取到硬盘上独立保存。
有以下两种提取方式，其共同要执行的步骤如下：打开含Flash文件的PPT文件,选择其中的Flash元素,用右键菜单复制(CTRL+C),然后到任意目录下,用右键菜单粘贴(CTRL+V),此时会生成类似片段*.shs的文件。
然后使用一下两种提取方式1.单个提取方式：首先设置好监视目录（可用浏览按钮），点开始监视按钮，然后CTRL+V 时将片段文件粘贴到这个目录下，Flash文件会自动提取出来（根据询问提取文件命名框是否选择决定是否会提示你保存文件名，如果未选中则自动使用文件名前缀来计数命名）2.批量提取方式：直接点批量提取按钮，然后选择要提取的多个片段文件，随后所有Flash 文件将被提取出来（批量提取只能使用自动命名方式）注意：程序第一次启动会显示关于对话框，并要求设置，一旦监视目录设置正确（即存在该目录），以后启动时将自动缩至托盘并自动开始监视。
ppt内部嵌入、提取动画(swf)问题
ppt内ppt内部嵌入、提取动画（swf)问题解决拷贝PPT课件后不能播放Flash影片的问题你会不会遇到这样的局面：当我们把一个插入有Flash影片的精美的PPT课件拷到别一台电脑上时，Flash影片无法播放了！怎么回事？使用Powerpoint制作PPT课件是老师们的家常便饭。
有时我们会在PPT课件中用到Flash动画影片，以往的做法是以控件链接的方式在PPT课件中插入swf动画文件，以达到上课时播放至该页时不用另外打开播放器而直接播放Flash影片。
这种方法很普遍，但有一个弊端，swf影片文件必须与PPT课件一起拷贝，并保持设置的“.swf”文件目录不变，影片才能在别一台电脑上正常播放，否则PPT课件会因为影片指向目录无对应影片文件而显示空白。
当然，这种情况遇多了，以后就变聪明了，也想出了解决的办法，建课件文件夹，将PPT课件、swf影片文件及mp3声音文件、视频文件等放在一个文件夹中，一起拷贝，通常这种做法也解决了文首提到的问题。
但，有时还是会出状况。
为避免这种情况发生，经过尝试，我们可以将swf影片文件包含到PPT课件中，拷贝时不用再拷贝swf影片文件（当然,mp3、视频还是得一起拷贝的，本文只介绍swf影片嵌入PPT的方法），也能在另一台电脑中正常播放PPT中的Flash影片。
这就需要我们设置一下Flash控件的参数了。
以下就分享如何设置PPT中的flash控件的参数。
在讲参数设置时，顺便把用控件插入Flash影片的方法也讲了（会操作这步的老师可直接浏览到第二点）一、使用ActiveX控件插入动画的方法1. 用PowerPoint制作课件时，依次打开菜单：视图->工具栏->控件工具箱。
2. 在打开的控件工具箱上，点击最下面右边的“其他控件”按钮。
3. 在列出的ActiveX 控件（电脑已安装的）选单中，选择“ShockWave Flash Object”。
4. 当鼠标变成十字型，即可在幻灯片要插入flash的合适位置上拖出一个矩形框框（注意：因为未设置影片所以会默认显示一个大叉叉），这就是flash动画框。
快速提取PPT中嵌入的视频和SWF文件的方法29页PPT
快速提取PPT中嵌入的视频和SWF文 件的方法
1、战鼓一响，法律无声。——英国 2、任何法律的根本；不，不成文法本 身就是 讲道理 ……法 律，也 ----即 明示道 理。— —爱·科 克
3、法律是最保险的头盔。——爱·科 克 4、一个国家如果纲纪不正，其国风一 定颓败 。—— 塞内加 5、法律不能使人人平等，但是在法律 面前人 人是平 等的。 ——波 洛克
谢谢！
36、自己的鞋子，自己知道紧在哪里。——西班牙
37、我们唯一不会改正人走得很慢，但是我从不后退。——亚伯拉罕·林肯
39、勿问成功的秘诀为何，且尽全力做你应该做的事吧。——美华纳
40、学而不思则罔，思而不学则殆。——孔子
提取PPT中元素(图片、动画、视频等)的几种方法
提取PPT中元素(图片、动画、视频等)的几种方法.txt16生活，就是面对现实微笑，就是越过障碍注视未来；生活，就是用心灵之剪，在人生之路上裁出叶绿的枝头；生活，就是面对困惑或黑暗时，灵魂深处燃起豆大却明亮且微笑的灯展。
17过去与未来，都离自己很遥远，关键是抓住现在，抓住当前。
提取PPT中元素（图片、动画、视频等）的几种方法１、提取PPT图片两招在播放PPT文件时，你发现其中有不少精美图片想要将它们保存下来。
只要可以通过下面两种简单的方法就可以轻易做到，一起来试试吧！方法一：如果需要提取保存的图片数量不多，你可以在PowerPoint中打开文件，依次点击“视图/普通”菜单，将视图模式设置为普通，然后右击所需图片，在弹出菜单中选择“复制”选项，将其粘贴至图像处理软件中，另存为图片文件即可。
方法二：如果需要提取的图片数量较多，可将所有图片文件一次性提取出来，再选择使用。
打开PPT文件，点击“文件”选项。
在下拉菜单中选中“另存为Web页”选项，在弹出的“另存为”对话框中。
点击“保存”按钮，生成同名htm文件及同名文件夹。
打开该文件夹，你就会发现PPT文件中所包含的全部图片都在其中等待你的挑选了。
２、ＰＰＴ转换为视频的几种方法 http://www.presentersoft/download/powervideopr o.exe）。
PowerVideoMaker虽然Advanced SystemCare Free (Advanced Windo也是采用屏幕捕捉的原理来转换PPT文档。
但它可以同步捕获视频和声音，而且捕捉的质量非常高。
该软件在进行转换时可直接调用PowerPoint来播放PPT文档，并在播放的同时进行高质量的视频捕捉，生成AVI和WMV 视频文件。
先将PPT转换成WMV及AVI文件1.运行PowerVideoMaker后，首先在其主界面(如图)单击“PowerPoint Source File”后的“Browse”按钮，导渗入渗出来转换的PPT源文件。
从ppt中导出flash
从ppt 中导出flash
第一步：要安装UltraEdit32编辑器（E:\chengxu\下载\UltraEdit-32_wmz ）。
最好使用绿色版的，下来就可用。
大家可以搜索下，网上很容易下载。
第二步：打开PPT 文件，并新建个word 文档，选取其中要导出的flash ，(Ctrl+c)复制（如图一）。
在任一磁盘空间或某一文件夹下，粘贴，此时磁盘上会出现一个名为“片段”的文件（如图二）
（图一）
图二
第三步：打开UltraEdit32，将该“片段”文件拉到UltraEdit32中，按Ctrl+F 或者点击菜单搜索查找,在出现的搜索栏输入 “46 57 53”（这三个数字是紧连着的），在搜索到的“43 57 53”或者“46 57 53”（如图三）中的“46”位置以上的数据全部删掉。
（如图四）(在4之前，按着鼠标左健不放，用鼠标一直拉到最前面，选取在数字 “46 57 53”之前的全部数据后，然后按Delete 健，Del 无效的话就用剪切)。
（图三）
（图四）
第四步：将文件另存为swf格式的文件（如图五），此时flash文件已经导出完毕。
（图五）。
巧妙提取Flash文件中的素材
巧妙提取Flash文件中的素材摘要：笔者从自己制作Flash课件的实践出发，详细介绍了如何从其他已有的Flash课件中获取素材的方法，供广大爱好Flash制作的朋友们参考借鉴。
关键字：Flash 课件素材方法我们知道，课件是否优秀在某种程度上取决于它所用到的素材，因此从其他已有的Flash课件中获取需要的素材，不仅是我们提高课件质量的有效方法之一，而且也可以使我们制作课件的工作事半功倍。
那么怎样可以较为方便地获取Flash课件中的素材呢？笔者结合自己制作课件时积累的一些经验，向大家介绍几种方法，供大家借鉴参考。
方法一：导入法Flash MX/2004及其以上版本的“文件”菜单下有“导入”命令，执行此命令下的子菜单可以将SWF文件导入到指定位置，如，导入到舞台、导入到库等。
一般情况下，当我们要使用某个Flash课件中的素材时，不是直接将其导入到我们要制作的课件中，而是重新创建一个Flash文件（如命名为“临时”），然后选择菜单“文件导入导入到库”，稍等后按“CTRL+L”或打开“窗口”菜单，单击其子菜单“库”将库打开，再切换到我们制作的课件并打开课件的库，最后直接从“临时”库中将我们需要的素材拖放到正在制作的课件中即可，从而实现素材的再利用。
创建新文件导入素材的好处是：避免无用的素材添加到课件中导致素材混乱，但课件的体积会增大。
有一些被打包成EXE格式的Flash课件，我们可以使用EXE2SWF 将EXE文件还原成SWF文件。
启动软件后，打开要转换的EXE文件，然后单击[CONVERT]按钮即可看到同名的SWF文件。
这种方法的优点：方便，直接。
缺点：对文件的破坏性也比较大，特别是一些影片剪辑和按钮都会面目全非，音乐文件和课件中的Actions语句也没有了，而且当课件较大时，导入时间很长，容易造成死机。
因此，我们可以结合第二种方法来获取素材。
方法二：分解法我们可以使用Sothink SWF Decompiler即硕思闪客精灵(笔者使用的是硕思闪客精灵MX2005简体中文版)对其进行分解。
快速导出提取PPT中的音乐、视频及媒体文件
快速导出提取PPT中的音乐、视频及媒体文件第一篇：快速导出提取PPT中的音乐、视频及媒体文件很多好的可以自动播放的PPT文件都有背景音乐，而设计精良的此类PPT背景音乐和内容都搭配的天衣无缝。
然而这些背景音乐一般都是纯音乐，当我们制作类似风格的PPT，想用相同的音乐，是否苦于无法搜索到这个音乐，因为我们压根不知道它的名称。
下面让主页君教你如何提取PPT中的音乐文件。
因对PPT2003，PPT2007，PPT2010版本打开文件的提取方式有区别，下面逐一介绍。
在PPT2003和PPT2007中提取方法：①打开相应PPT文件；②单击“文件”——“另存为”，另存为网页html文件格式；③在保存地址里，有一个和原PPT文件名一样的文件夹，原PPT 里包含的所有多媒体文件都在里面。
然后剪切复制到你的收藏夹里吧。
PPT2010中提取方法：①右击相应PPT文件（以文件“简历动画,pptx”为例），单击“添加到“简历动画.rar"(T)”；②打开压缩后的压缩文件；③单击“简历动画.pptx”，再单击“查看”选项；④出现另一个框，双击打开名为“ppt”的文件夹；⑤在出现的框中，单击名为"media"的文件夹；⑥又出现下一子框，里面饱含了该PPT文件所有的多媒体文件，单击你想要的文件，按住不放，直接拖到桌面就可以了。
其中音乐文件名为“media”。
第二篇：ppt中加入背景音乐图片视频如何在ppt中加入背景音乐<添加入音乐后就会有一个小喇叭，点它然后点菜单栏中的幻灯片放映，选里面的自定义动画，在右边会弹出选择项，选中你想一直播放的音乐，在右边有一个下拉菜单的按扭，点它，选择效果选项，在弹出的对话框中有一个选项是停止播放，在这下面有三个选项，选中第三个，在多少张之后结束播放随你选，你想在哪里停就选那一张幻灯片，想播放到结束就选最后一张。
>略解：插入菜单 / 影片和声音 / 文件中的声音... / 自动or在单击时 / 完结（更多附加内容在详解内容里）详解：（ppt2003版）1.在插入菜单中，选“影片和声音”2.选第四个“文件中的声音..”在对话框中选择你要的音乐。
三步提取PPT中的SWF文件
三步提取PPT中的SWF文件作者：王昌红来源：《电脑爱好者》2012年第08期在很多制作精美的PPT课件中，往往少不了SWF动画的点缀，要把这些SWF文件从PPT中提取出来需要一定的技巧。
教物理的李老师正在做课件，他从网上下载了别的课件做参考，这份课件里有一个制作精美的SWF动画，李老师很想把这段动画提取出来用在自己的PPT里，但不知怎么办，于是找到我，我借助UltraEdit软件，很好地帮助李老师把问题解决了。
生成SWF文件的“片段”首先，我打开李老师说的那个课件，找到嵌有SWF动画的那张幻灯片，单击一下使它处于当前编辑环境下。
接着，在编辑区的“Flash控件”区域内右击，选择“复制”菜单项（图1）。
然后在桌面处右击，选择“粘帖”菜单项，把名为“片段”的文件复制到桌面上。
“搜索”SWF的文件头启动UltraEdit后（/down/171/36376.html），依次单击窗口的“文件→打开”，在“打开”对话框框中选中桌面上的“片段”文件，双击打开。
接着，单击“搜索”菜单中的“查找”项，弹出“查找”对话框。
在“查找内容”文本框处输入FWS（或者是CWS，非加密的SWF文件头是FWS，加密的SWF文件头是CWS），同时勾选“查找ASCII”，单击“向下”单选框，单击“下一个”按钮（图2）。
在UltraEdit窗口代码区中出现一行代码块“46 57 53 06 31 0F 01 00”（由于不同SWF文件大小和版本不同，“46 57 53“后面的数值可能和这有所不同），这就是SWF文件的文件头（图3）。
复制SWF文件块根据SWF文件的文件结构我们可知，“46 57 53”三个数值是SWF文件的文件头的十六进制代码，“06”表示该SWF文件的版本号，“31 0F 01 00”则是SWF文件的文件大小。
由于这里的数值是以十六进制先低位再高位的方式排列，所以实际数值是要倒置过来，即文件大小是十六进制的“00 01 0F 31”，用WinXP自带的“计算器”软件把十六进制的“00 01 0F 31”换算成十进制等于69425。
ppt中提取文件
如果需要提取的图片数量较多，可将所有图片文件一次性提取出来，再选择使用。
打开PPT 文件，点击“文件”选项，在下拉菜单中选中“另存为Web页”选项，在弹出的“另存为”对话框中，点击“保存”按钮，生成同名htm文件及同名文件夹。
打开该文件夹，你就会发现PPT文件中所包含的全部图片都在其中等待你的挑选了。
只有一页的ppt中播放一个视频，这个视频有100MB。
保存后查看ppt文档的大小，只有可怜的几百KB。
试想一下视频怎么可能被压缩将近1000倍？
那么ppt是如何保存视音频文件的呢？在ppt内部使用链接的方法直接指向其位置所在，并且用其内置（或者是Windows内置）的插件进行播放！
如何找到你所需要的音频文件？请参考我上传的图片。
追问
你话的那个背景音乐的圈圈根本就没有这个我知道的正是因为找不到这个而且自定义动画里也找不到相关的音乐文件所以我才来问的
回答
刚才上网查看了一下，保存为网页的方法是比较简单易行的。
当然，还有一种方法你现在也可以一试：
1）首先，将你要提取音频的ppt文档保存一个副本；
2）重命名ppt文件，将其扩展名改为zip（也就是将ppt文件改为一个zip压缩文件）；
3）使用解压缩软件（免费的有好压haozip，收费的有WinRAR和WinZip）；4）进行提取音频文件（可能只能提取出wav格式的音频吧）。
提取PPT中嵌入的SWF文件方法
教材来自网络幻灯制作：Chen 左键翻页E-mail文化传播网有一些幻灯片，特别是贺卡类幻灯片，嵌入精美的SWF格式Flash动画。
如果我们喜欢它，可以通过【复制】和【粘贴】用到自己制作的幻灯上。
但想把PPT中嵌入的SWF文件提取出来，必须使用提取SWF软件。
能提取PPT中嵌入的SWF软件很多，如：提取SWF.xls、十六进制编辑器（HEdit、UltraEdit和winhex ）、FLASH吸血鬼等。
经过试用，向大家介绍两个提取SWF软件：提取SWF.xls和HEdit（十六进制编辑器）的使用方法，供有兴趣者学习参考。
本幻灯以提取生日贺卡中嵌入的”生日礼物.swf”为例，介绍两种提取嵌入PPT中SWF文件的方法，并进行两种方法的比较。
一、用“提取SWF.xls”提取嵌入PPT中的SWF文件方法这个方法还没有见到正式的命名。
用Microsoft Office Excel 2003制作出“提取SWF.xls”，用这个文件可以提取嵌入到PPT中的SWF文件，故把“提取SWF.xls”文件作为软件名。
1、制作“提取SWF.xls”方法（一）制作“模块代码.doc”备用请把下页VBA代码全部复制，粘贴到Word文档，把Word文档另存为“模块代码.doc”备用。
请把以下VBA代码全部复制，粘贴到Word文档，把Word文档另存为“模块代码.doc”备用。
Sub ExtractFlash()Dim tmpFileName As String, FileNumber As IntegerDim myFileId As LongDim myArr() As ByteDim i As LongDim MyFileLen As Long, myIndex As LongDim swfFileLen As LongDim swfArr() As BytetmpFileName = Application.GetOpenFilename("office File(*.doc;*.xls),*.doc;*.xls", , "确定要分析的Office 档")If tmpFileName = "False" Then Exit SubmyFileId = FreeFileOpen tmpFileName For Binary As #myFileIdMyFileLen = LOF(myFileId)ReDim myArr(MyFileLen -1)Get myFileId, , myArr()Close myFileIdApplication.ScreenUpdating = Falsei = 0Do While i < MyFileLenIf myArr(i) = &H46 ThenIf myArr(i + 1) = &H57 And myArr(i + 2) = &H53 ThenswfFileLen = CLng(&H1000000) * myArr(i + 7) + CLng(&H10000) * myArr(i + 6) + CLng(&H100) * myArr(i + 5) + myArr(i + 4)ReDim swfArr(swfFileLen -1)For myIndex = 0 To swfFileLen -1swfArr(myIndex) = myArr(i + myIndex)Next myIndexExit DoElsei = i + 3End IfElsei = i + 1End IfLoopmyFileId = FreeFiletmpFileName = Left(tmpFileName, Len(tmpFileName) -4) & ".swf"Open tmpFileName For Binary As #myFileIdPut #myFileId, , swfArrClose myFileIdMsgBox "以" & tmpFileName & "名字保存"End Sub（二）把Excel 2003宏的安全等级降为“中”由于“提取SWF.xls”文件中使用宏，在【模块】中加入VBA 代码，不降低宏的安全等级，“提取SWF.xls”不能正常运行。
2024版从PowerPoint文件中提取文件或对象
可以在幻灯片中添加文本框，输入所需的文本 内容。
图片
可以将图片插入到幻灯片中，包括JPEG、PNG、 GIF等格式。
形状
PowerPoint提供了丰富的形状库，可以在幻灯片 中绘制各种形状。
图表
可以在幻灯片中插入图表，用于展示数据和趋势分析。
表格
可以在幻灯片中插入表格，用于展示数据对比和分 类信息。
PowerPoint文件类型
PPT文件
这是最常见的PowerPoint 文件格式，通常以.ppt 或.pptx为扩展名。
PPS文件
这是PowerPoint的幻灯片 放映格式，通常以.pps 或.ppsx为扩展名。
POT文件
这是PowerPoint的模板文 件格式，通常以.pot 或.potx为扩展名。
02
分析目标文件或对象的特征，以便 选择合适的提取方法。
选择提取方法
使用PowerPoint软件自带的“另存为” 功能，将文件保存为包含所需对象的 格式，如将PPTX文件保存为包含图片 的文件夹。
编写自定义脚本或程序，通过编程方 式访问PowerPoint文件并提取所需内 容。
利用第三方工具或插件，如“PPT助 手”等，实现更灵活、高效的提取操 作。
03
简化工作流程
通过自动化提取文件或对 象，可以减少手动操作， 简化工作流程。
提高数据准确性
提取过程中可以避免人为 因素导致的数据错误，提 高数据的准确性。
增强可重用性
提取出的文件或对象可以 方便地重用于其他项目或 任务中，提高资源的利用 效率。
2023
PART 02
PowerPoint文件概述
REPORTING
进行课程资源的整合和优化。
PowerPoint文档里内嵌的Flash如何导出还原成SWF
PowerPoint文档里内嵌的Flash如何导出还原成SWF下载的PPT文稿，里有内嵌的Flash,想把PPT里的Flash 还原为SWF文件用于别的地方。
谢谢至少有两个办法是可以实现一、使用winhex 方法如下：1、打开令你口水连绵不绝含有flash的那个PPT，鼠标对准flash，选择“复制”；2、在任一磁盘空间或某一文件夹下，选“粘贴”，此时磁盘上会出现一个名为“片段”的文件；3、用winhex打开之，搜索“465753”；(此为嵌入的flash文件开头)4、你会找到这样一串数据：46 57 53 06 31 16 00 00(前面三个数是一样的，后面可能有所不同，我以我的试验为例)5、此数据需要反过来读。
46 57 53 翻译过来就是fws，即swf；0不用管，31 16是此flash文件的长度，06是该flash的版本。
6、把31 16 倒过来，就是1631，这是16进制的，把它转成10进制；(就是5681)7、按住鼠标左键不放，从46 57 53开始，一路狂奔，你会看到“offset”数字一直在变化，直到提示总和已到5681。
8、把这部分复制，选择“编辑”--copy block--置入新文件9、把这个置入的新文件后缀名改为：.swf，此文件即为千辛万苦从PPT提取出来的文件。
二、采用PowerPoint文件提取器ppSWFRipper.rar1、到网上找到PowerPoint文件提取器，英文名：ppSWFRipper；2、解压后，运行之，选择“受监视的目录”，此即为要提取的PPT资源所在地；3、打开令你口水连绵不绝含有flash的那个PPT，鼠标对准flash，选择“复制”；4、在PowerPoint文件提取器设置监视的目录内，选“粘贴”，此时磁盘上会出现一个名为“片段”的文件；5、选择“开始监视”；6、选择“批量提取”，选择你刚才生成的powerpoint片段文件，然后就去你刚才设置的那个盘找，看看那个你令你魂牵梦绕的flash在不在那等你？如果提取出错，请检查：你是否还开着刚才打算提取的PPT？监视目录有没有搞错？三、千万不要相信什么另存为网页文件就可找到，此招只能快速搜括PPT内所有的图片，对flash那是无能为力的。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
安徽桐城余双红
图1-14 PPT中嵌入的SWF就以“生日礼物.swf”被提取，点击【确定】保
安徽桐城余双红
前面介绍的方法只适用于Microsoft Office Excel 2003。对于使用Microsoft Office Excel 2007以 上者，可以用以下方法操作。
1.将Excel07版中宏的安全级别降低。 2.新建一Excel文档，选择“开发工具”——启动“VB”编辑器。 （图1）
安徽桐城余双红
一、快速提取安PP徽T桐中城余嵌双红入的视频文件
PPT嵌入的视频，通常是指ppt2007及以上的版本 （ppt2003版本无法内嵌视频）， 用解压缩软件 （winrar，好压等。。。）打开pptx文件， 在:\ppt\media文件夹中应该可以找到你要的，最好 直接解压它，分组按类型就找到了！
图1-3【工具】—>【宏】—>【VB编辑器】
安徽桐城余双红 图1-4 在VB编辑器中【插入】—>【模块】
图1-5 把下一幻灯片中的VBA代码粘贴到【模块】的代码窗口中。
安徽桐城余双红 Sub ExtractFlash()
Dim tmpFileName As String, FileNumber As Integer Dim myFileId As Long Dim myArr() As Byte Dim i As Long Dim MyFileLen As Long, myIndex As Long Dim swfFileLen As Long Dim swfArr() As Byte tmpFileName = Application.GetOpenFilename("office File(*.doc;*.xls),*.doc;*.xls", , "确定要分析的 Office 档") If tmpFileName = "False" Then Exit Sub myFileId = FreeFile Open tmpFileName For Binary As #myFileId MyFileLen = LOF(myFileId) ReDim myArr(MyFileLen - 1) Get myFileId, , myArr() Close myFileId Application.ScreenUpdating = False i=0 Do While i < MyFileLen If myArr(i) = &H46 Then If myArr(i + 1) = &H57 And myArr(i + 2) = &H53 Then swfFileLen = CLng(&H1000000) * myArr(i + 7) + CLng(&H10000) * myArr(i + 6) + CLng(&H100) * myArr(i + 5) + myArr(i + 4) ReDim swfArr(swfFileLen - 1) For myIndex = 0 To swfFileLen - 1 swfArr(myIndex) = myArr(i + myIndex) Next myIndex Exit Do Else i=i+3 End If Else i=i+1 End If Loop myFileId = FreeFile tmpFileName = Left(tmpFileName, Len(tmpFileName) - 4) & ".swf" Open tmpFileName For Binary As #myFileId Put #myFileId, , swfArr Close myFileId MsgBox "以" & tmpFileName & "名字保存" End Sub
二、快速提取安PP徽T桐中城余嵌双红入的SWF文件
这里以提取生日贺卡中嵌入的”生日礼物.swf”为例 介绍。 用“提取SWF.xls”提取嵌入PPT中的SWF文件。这个 方法还没有见到正式的命名。用Microsoft Office Excel 2003制作出“提取SWF.xls”，用这个文件可 以提取嵌入到PPT中的SWF文件，故把“提取SWF.xls” 文件作为软件名。
安徽桐城余双红
3.在打开的窗口中选择“插入”中的“模块”。 （图2）
4.粘贴提取S安WF徽的桐模城余块双代红码。（注：必须先将代码复制在 Word文档中再粘贴到此处。（图3）
5.关闭“VB”编辑器，将文档另存为Excel03版的工作薄 格式。命名为表格安1徽（桐可城余以双随红意命名），注意必须另存为03版的 格式。
1、制作“提取SW安F徽.桐x城ls余”双红方法
（1）把Excel 2003宏的安全等级降为“中” 由于“提取SWF.xls”文件中使用宏，在【模块】中加入
VBA代码，不降低宏的安全等级， “提取SWF.xls”不能正常运行。 宏的安全等级设置方法：【工具】→【宏】→【宏的安全
性】→选【中】见图1-1和图1-2
。
图1-7 复制嵌入“生日礼物.swf ”的flash控件
安徽桐城余双红
图1-8把嵌入“生日礼物.swf ”的flash控件粘贴到excel 。
安徽桐城余双红
图1-9【文件】→【另存为】之后选择路径，保存为“生日礼
3、 “提取swf.xls”使用方法 打开“提取安sw徽f桐.x城l余s”双红，出现【安全警告】，点击【启用 宏】。之后点击：【工具】—>【宏】—>【宏】—>【执行】，弹出 【确定要分析的offes档】对话框，把路径指向“生日礼物.xls”， 【执行】的结果是PPT中的SWF文件以“生日礼物.swf”被提取并保 存。见图 1-10至1-14
安徽桐城余双红
图1-6 退出VB编辑器后，另存为“提取SWF.xls”
安徽桐城余双红
已经建好的“提取SWF.xls” 点击这里下载
2、制作 “生安徽日桐礼城物余双.x红ls” 新建一个excel文档，，打开该文档，将PPT中的flash控件 （ ShockWave Flash Object ）复制，粘贴到excel ，另存为“生 日礼物.xls”,见图1-7至图1-9
6.另新建一Excel文档，将幻灯片中插入的SWF控件复制后 粘贴到文档中。（图4）
7．将文档另存为Excel03版的工作薄格式。命名为表格2 （可以随意命名）注意必须另存为03版的格式。
安徽桐城余双红
8.重新打开表格1，选择“宏”——在“宏”窗口选择“执行”。 （图5）
安徽桐城余双红
9.在弹出的“确定要分析的Office文档”窗口找到保存的 表格2并打开。（图6）
图1-10 打开“提取swf.xls”，出现【安全警告】，点击【启用
安徽桐城余双红
可编辑
安徽桐城余双红
图1-11 打开“提取swf.xls”，点击：【工具】—>【宏】—>【宏】
安徽桐城余双红
图1-12【宏】—>【执行】
安徽桐城余双红
图1-13 弹出【确定要分析的offes档】，路径指向“生日礼物.xls”，点击 【打开】
图1-1 【工具】→【宏】→【宏的安全性】
安徽桐城余双红
图1-2 【宏的安全性】→选【中】
（2）新建e安xc徽e桐l文城余档双，红打开该文档，找到：【工具】—> 【宏】—>【VB编辑器】，在VB编辑器中【插入】—>【模块】 在弹出窗口中粘贴VBA代码（见后面）。退出VBA编辑器。另存为 “提取swf.xls”，见图1-3至图1-6。
安徽桐城余双红
安徽桐城余双红
可编辑
10.插入PPT中安的徽桐SW城F余文双件红就以Book2的名称保存。（图7）
安徽桐城余双红
“提取SWF.xls”制作不用安装软件，只要得到提取SWF模 块代码就可以制作“提取SWF.xls”，制作这个文件操作不算复杂。 制作完成后就可以用它单独来提取PPT中嵌入的SWF文件，操作很简 单，提取的SWF文件完整，文件也小，与嵌入PPT的SWF原件大小差 不多。因此相对于诸多方法，我推荐这个方法。