如何用vba给ppt幻灯片插入本地电脑上的图片?

要用vba给ppt幻灯片插入本地电脑上的图片,可以使用Shapes对象的AddPicture或者AddPicture2方法。

其中Shapes对象的AddPicture方法语法如下:

其中FileName参数为要插入的图片的完整路径,LinkToFile参数和SaveWithDocument参数分别表示是否链接插入的图片以及是否将图片随着ppt文档一起保存。

其中当LinkToFile参数为msoFalse,SaveWithDocument参数必须为msoTrue,这点是特别要注意的。

另外的几个参数分别表示插入的图片位于幻灯片的左上角的位置和图片的长宽大小。

而Shapes对象的AddPicture2方法语法如下:

它只比AddPicture方法多了一个参数compress,用于指定插入的图片是否需要压缩。

根据以上的这些知识,可以使用如下的vba代码在ppt的第一个幻灯片中插入一个本地电脑上的图片:

       

发表评论