首页 > PPT专区 > PPT教程 >

将PPT内嵌图片一次性全部导出的方法

PPT教程 2023-01-15

关于PPT或PPS 文件中的一次性导出其中的全部图片,我在【附录】中介绍过,有些概念与方法,为了方便起见,摘录重复如下:“PPS是放映文件,一打开就要放映,无法进行编辑。因此,要做这事,先要打开PPT系统,在那里打开PPS文件,进行PPT的编辑。而PPT文件一打开,就直接进入了PowerPoint”。

PPT2003版中将PPT内嵌图片一次性全部导出的方法

1.打开PowerPoint幻灯片制作软件,在PowerPoint中打开你需要图片的那个演示文稿文件(ppt或pps).

2.在“文件”菜单中,单击“打开”命令,在文件列表中,单击要提取图片的PPT或PPS文件,单击“打开”按钮。

3.在“文件”菜单中,单击“另存为”命令。

4.然后在“保存位置”框中指定一个文件夹,在“保存类型”框中,单击“网页(*.htm;*.html)”【有的版本是“Web页(*.htm;*.html)”】,在“文件名”框中指定一个文件名,比如AA,单击“保存”。

5.在指定的文件夹中就生成一个名为“AA .htm”网页文件,还同时生成一个名为“AA .files”的文件夹。这个“AA .htm”网页文件,你可以不予顾及,但千万不要删掉,否则后面那个名为“AA .files”文件夹也会自动删除的,我们要的就是这个文件夹,这个文件夹里保存了嵌入到PPT文件的所有图片文件和声音、影视等文件,而且这些文件没有任何损失,与原PPT文件中使用的一模一样,打开这个文件夹,你就可以使用这些图片了。不过请当心,同样的图片会有两张,大小或者文件格式不一样,可以在这个文件夹里用右键菜单,先将文件按“类型”排列、分组,即可轻易获得所有图片。再重复说一句,演示文稿中内嵌的音乐文件和其他媒体文件都可在此找到,你可以从中轻易得手。

PPT 2010版中将PPT内嵌图片一次性全部导出的方法

但是PowerPoint 2010 版不提供另存新文件为 htm、mht 选项,但假如需要将文件转换成 htm 或 mht 等网页格式,可以使用VBA(Visual Basic for Applications)编程来解决

准备工作:预先在D盘根目录中建立一个新文件夹DV,后面产生的新文件及文件夹都将存在这个文件夹中。

先打开PowerPoint 2010,在PowerPoint 2010中打开你需要导出其中所有图片的某个ppt文件,比如是“家乡巨变-上海百年变迁历史图片对照.ppt”。

使用快捷键 Alt + F11 打开 VBA(Visual Basic for Applications)编程窗口(如是笔记本,还需按下Fn键,即Fn + F11 + Alt):

当VBA窗口出现后,再使用快捷键Ctrl + G,弹出立即窗口:

在立即窗口中键入(或粘贴入):

ActivePresentation.SaveAs "F:\DV\AAAA.htm", ppSaveAsHTML, msoFalse

其中您必须将 SaveAs后的内容修改为另存新文件的文档路径与名称,例如本例要把新文件另存为到F盘根目录下的文件夹DV 中,文件名为 AAAA.htm,那么SaveAs后的内容即为"F:\DV\AAAA.htm",该路径应完整地放在两个英文状态下的双引号之间,反斜杠也是英文状态下的反斜杠。根据你的实际需要,只需在程序中改变那一段路径,其余不必改动。所以上面这一段程序是可以拷贝、粘贴后修改的,可以用拷贝、粘贴到记事本中保存,以备后用:

输入完毕检查无误后,按 Enter 键即可执行“另存为”(SaveAs)命令,由于保存需要一定时间,不要着急,一会儿电脑就将文件另存新文件为 htm了。在F盘根目录下的文件夹DV 中,有了一个新的网页文件,它的文件名为 AAAA.htm,还同时生成一个名为“AAAA .files”的文件夹。

这个“AAAA .htm”网页文件,你可以不予顾及,但千万不要删掉,否则那个名为“AAAA .files”文件夹也会自动删除的,我们要的就是这个文件夹,这个文件夹里保存了嵌入到PPT文件的所有图片文件和声音、影视等文件,打开这个文件夹,同样的图片会有两张,大小或者文件格式不一样,可以在这个文件夹里用右键菜单,先将文件按“类型”排列、分组,即可轻易获得所有图片。演示文稿中内嵌的音乐文件和其他媒体文件都可在此找到,你可以从中轻易得手。

上述程序也可在VBA中编写成过程,也就是“宏”,供储存后重复调用(该过程也可保存到记事本中备用)。对此有基础有兴趣的朋友可以试一试,这只是VBA使用中比较简单的一种。提供过程代码供参考:

Sub 另存网页()

ActivePresentation.SaveAs "F:\DV\AAAA.htm", ppSaveAsHTML, msoFalse

End Sub


Copyright © 2016-2023 office学习教程网 office.tqzw.net.cn. All Rights Reserved.