黑松丛林盆景图片:【PowerPoint技巧】快速插入多张图片功能

来源:百度文库 编辑:偶看新闻 时间:2024/05/03 15:12:35

 

 

    制作PPT时很多时候我们需要往往PPT里面插入图片,如果要插入的图片数据很多的话,一张张插入操作起来就比较烦索了,这里介绍一种快速插入多张图片到PPT的方法。

 

工具/原料

  •  MS PowerPoint

  •  测试图片N张

步骤/方法

  1.  首先我们找到所要插入到PPT里面的图片,我这里的图片为百度HI里面的表情图片,很熟悉吧。

  1. 在开始之前我们需要提前做一下准备工作,就是把这些文件的名称做一下修改,改为从数字,从1开始,直到最后一张。如何修改文件名称可使用右键菜单,如下图:

  1. 把所有的文件名都修改完成,如下图:

  1. 好了,我们开始下一步,新建一个PPT文档。如下图:

  1. 新建宏文件

    • 按下Alt+F11键打开Visual Basic编辑器窗口

    • 选择插入菜单中模块功能

 

  1. 输入宏代码

    • 在打开的模块代码窗口中输入如下内容:

      代码具体内容如下:

        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 & ".gif"

        End With

        Next

        End Sub

       

    • 把上面的代码复制到框里就可以。

 

 

  1. 关闭模块代码窗口,代码会自动保存。

  1. 关闭Visual Basic编辑器,返回PPT主窗口。

  2. 连续按Ctrl+M键建立与图片数目相等的幻灯片。

    • 如我这里有60张图片,我就新建到60张幻灯片。

  1. 运行宏文件

    • 按Alt+F8键 打开宏对话框

    • 选中刚刚建立的InsertPic宏,点击“运行”

  1. 运行完成,60张图片都插入到了PPT里面,

 

 

 

 

 

 

 

注意事项

 

  • 插入代码时注意要把图片的路径修改成为你本地图片的位置

  • 注意所准备图片的图片类型,在上图代码部分写上与你选择图片相对应的扩展名。