如何用vba实现将ppt幻灯片中的图片批量导出为独立的图片文件?

当在ppt幻灯片中插入了图片,单击图片另存为对话框,可以将图片另存为以下5种图片格式。

借助这一功能可以实现图片在BMP、GIF、JPG、PNG、EMF、WMF等图片格式之间的相互转换。

要用vba实现ppt的这项功能,需要使用shape对象的Export方法,但是这个方法被微软隐藏起来了,默认情况下看不到这个方法

它的语法如下:

其中PathName参数为导出后放置图片的完整路径,Filter参数为导出后的图片格式,它可以是以下6种:

有了以上的知识,可以使用如下的vba代码批量将ppt幻灯片中的图片导出为独立的指定格式的图片文件:

以上代码举例演示了如何将ppt演示文稿中的第一个幻灯片中的所有图片导出为独立的JPG格式的图片文件。





       

发表评论