【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《在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.Slides(i).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