在PPT中批量插入背景图片

2022-05-16 22:59:16   文档大全网     [ 字体: ] [ 阅读: ]

#文档大全网# 导语】以下是®文档大全网的小编为您整理的《在PPT中批量插入背景图片》,欢迎阅读!
背景图片,批量,插入,PPT
PPT(PowerPiont2007)中批量插入背景图片



在我们制作PPT时,一个PPT中常常包含多张幻灯片,且为了美观,几乎每张幻灯片中都会插入不同的图片作为背景。同样插入背景图操作重复N次,实在太累人。现我们通过宏快速完成。 1、准备背景图片

这里我们假设在硬盘(C盘根目录)新建一个名为“Pictures”的文件夹,将所有准备好的背景图片C:\Pictures下,背景图片文件名的格式为“1.jpg”“2.jpg”“3.jpg”……依次顺延,不能产生间断。 2、新建PPT文件

C:\Pictures下新建1个存放背景图片的空白PPT文件,文件名为批量插入图片.PPT打开PPT选中空白PPT页,连续按Ctrl+M键建立与要插入背景图片数量相等的空白PPT页。 (即:想要播入50背景图片,就建立50张空白PPT页) 3制作

启动PowerPoint 2003/2007,然后单击视图命令,如下图1



输入宏名“InsertPic”,宏作用于“批量插入图片.PPT”中,点创建按钮。如下图2





此时PPT2007会自动打开“Visual Basic 编辑器窗口,将以下代码粘贴,如下图3




代码如下:

Sub InsertPic() Dim i As Integer

For i = 1 To ActivePresentation.Slides.Count ActivePresentation.Slidesi.Select With ActiveWindow.Selection.SlideRange .FollowMasterBackground = msoFalse

.Background.Fill.UserPicture "C:\Pictures\" & i & ".jpg" End With Next End Sub

关闭“Visual Basic编辑器窗口,上边输入的模块代码就会自动保存。

4、运行宏,批量插入背景图片

如图1,单击视图命令,如图2,选宏InsertPic,点运行按钮。此时准备好的背景图片全部放入PPT。完成。

小提示:如果不能运行原因有2

1、宏安全性。关闭PPT文件,再打开时,系统会提示,选打开宏。重复步骤4 2、文件名和路径不批配。以上提供的代码中,

“ .Background.Fill.UserPicture "C:\Pictures\" & i & ".jpg"”表示插入到幻灯片中的背景图片保存在 C:\Picture\目录下,背景图片的格式为jpg,如有不同,请自行更改。


本文来源:https://www.wddqxz.cn/2e7d4c04eff9aef8941e0649.html

相关推荐