在ppt中怎样快速添加多张图片

2016-11-03

有时我们可能需要在ppt中插入多张图片,一张一张的插入太慢,那么如何实现快速添加多张图片呢?下面就让小编告诉你 在ppt中怎样快速添加多张图片的方法。

在ppt中快速添加多张图片的方法:

准备好图片,打好有序数字的图片文件名如:1.jpg、2.jpg……,放在pictures文件中,假如放在D盘中,那么如图

打开ppt2003的界面

按快捷键ctrl+m,连续按创建多个空白幻灯片,要插入多少图片建多少个,也就是连续按多少下快捷键。

按快捷键alt+f11,打开Visual Basic编辑器窗口,右键点击”插入“,再点击”模版“

在弹出的代码编辑窗口中输入以下代码:

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:Pictures" & i & ".jpg"

End With

Next

End Sub

代码输入后关闭。再按快捷键alt+f8,打开宏对话框,选中我们上面建立的InsertPic宏,点击“运行”即可,这时就可以把图片都插入了。

更多相关阅读

最新发布的文章