如何同时给每张PPT插入不同的图片?这2种方法可行!

2023-12-20 00:47:12

有时候创作PPT,我们需要把几十张图片插入到PowerPoint中,每张图片作为一张幻灯片,如果一张张手动操作,那就未免太花时间了。今天小编来分享2种方法,可以让您快速给每张PPT插入不同图片。

方法一、使用“创建相册”

1. 将所有需要插入PowerPoint的图片全部放在一个文件夹里;

2. 打开PowerPoint,然后依次点击菜单选项卡【插入】→【相册】-【新建相册】;

?

3. 在弹出的“相册”界面中,点击【文件/磁盘】;

?

4.?随后会弹出“插入新图片”界面,找到并选择需要插入PowerPoint的所有图片,比如小编需要插入6张图片,然后点击【插入】按钮;

5.?回到“相册”界面,如果需要插入文本框,可以选择“新建文本框”,还可以调整图片的顺序,删除不要图片,“相册版式”列表中的“图片版式”可以单独调整每张图片的形状,选择完成后点击【创建】即可将图片以相册的形式导入PowerPoint中。

操作完成后,可以看到,选中的每张图片都分别插入到每张幻灯片中。

?

?方法二、使用“VBA”代码

1. 将所有需要插入PowerPoint的图片全部放在一个文件夹里,并且按“文件名+序号”统一命名,比如小编需要插入6张图片,命名如下图样式,如果需要插入100张图片,则按1-100命名,以此类推。

2. 打开PowerPoint后,通过快捷键“Alt+F11”打开VBA编辑器,然后依次点击菜单选项卡【插入】→【模块】;

3.?出现空白编辑器后,输入以下代码:

Sub InsertPic()

Dim i As Integer

For i = 1 To ActivePresentation.Slides.Count

ActivePresentation.Slides(i).Select

With ActiveWindow.Selection.SlideRange

.FollowMasterBackground = msoFalse

.Background.Fill.UserPicture "D:\资料\图片" & i & ".jpg"

End With

Next

End Sub

其中,"D:\资料\图片"表示图片的“所在文件地址\图片名”,需要根据自己文件保存地址及命名做更改, i 表示文件序号。

4. 输入代码完成后,关闭VBA编辑器,回到PPT页面,通过快捷键“Ctrl+M”创建与需要插入图片数量一样多的空白幻灯片,比如小编需要插入6张图片,就创建6个空白幻灯片。

5. 通过快捷键“Alt+F8”打开宏对话框,然后选择刚才创建的宏,并点击【运行】,就会开始自动添加图片了。?

完成操作后,可以看到,文件夹里的图片都自动添加到每张幻灯片上了。

以上就是PPT快速插入不同图片的2种方法。

另外再分享一下,做好的PPT如果不想被他人随意编辑更改,记得给PPT设置“限制编辑”的密码,这样只要没有密码就无法编辑PPT了。

操作很简单,只需要将PPT通过“另存为”方法,在“另存为”对话框中依次点击【工具】→【常规选项】;

在“常规选项”页面中的【修改权限密码】一栏里输入想要设置的密码,点击【确定】后再输入一次就设置好了。再次打开PPT,就会提示需要密码才能编辑文件。

?

需要提醒一下的是,设置了“编辑密码”后,一定要把密码记牢或者保存好,因为忘记密码,只能以“只读方式”打开PPT,就无法进行编辑更改了。

如果担心会不小心忘记密码,不妨收藏一个PPT相关的工具,比如小编使用的工具,可以在忘记密码的情况下,直接去除PPT的“限制密码”。

只需要选择工具里的【解除限制】模块,再导入受限制的PPT文件即可。

?

今天的分享就到这里,希望可以帮到小伙伴们!?

文章来源:https://blog.csdn.net/Chinland/article/details/135082247
本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。