Powerpoint怎么快速插入多张图片
发布时间：2023-08-20 22:20:08
当微软的Office与微软VB中的宏功能相遇时，便可以创造出强大的功能，例如在这篇文章中就介绍了利用这两个工具瞬间插入上百张图片。
如果要插入几十甚至几百张图片，并且要求每张图片插入到每张幻灯片页面上(即有几张照片就要有几张幻灯片)你会怎么做?
按照常用的方法点击“插入→图片→来自文件”菜单命令，然后一个一个选择需要的图片，或者点击“格式→背景”命令，将图片作为PowerPoint的背景导入，这样也太浪费时间了。在这种情况下，可以借助PowerPoint强大的宏功能，将多步操作合并为一步，批量插入图片。
第一步：首先准备好图片，假设在C盘下面的Pictures文件夹内有100张jpg格式的图片，如“C：Pictures1.jpg”、“C：Pictures2.jpg”、“C：Pictures3.jpg”等，文件名是有序的数字.
第二步：启动PowerPoint 2003，按下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 "C：Pictures" & i & ".jpg"
End With
Next
End Sub
第三步：关闭Visual Basic编辑器窗口，上面的模块代码会自动保存。此时，连续按Ctrl+M键建立与图片数目相等(如：100)的多个空白幻灯片。按Alt+F8键打开宏对话框，选中我们上面建立的InsertPic宏，点击“运行”即可，100张图片很快就自动插入到幻灯片中
0
投稿猜你喜欢
- Windows8出来了……但它的界面是不是有一点不习惯？一个是新的Metro版开始屏幕，还有一个是资源管理器的Ribbon界面……总有朋友看
怎么查看WiFi密码？目前很又多地方的WiFi都是免费的，那么该如何查看那些免费WiFi的密码呢？下面就给大家介绍通过微信小程序查看WiFi- 不少小伙伴在打开word的时候遇到了向程序发送命令时出现问题的情况，所以下面就给你们带来了向程序发送命令时出现问题解决方法，如果你也遇到了就
- 有不少小伙伴都喜欢使用Wps这一款国产办公软件，不过有部分小伙伴在使用的过程中难免会出现不熟悉的地方，例如我们要如何将表格中的文字变成竖排显
- 做人事管理的某位朋友，说想要用函数查询单位不同部门员工信息，随意输入单位，所在部门的员工信息会自动查询，结果如下：上中的查询效果是由函数VL
- 如何快速提升qq群等级头衔？自从qq群有了等级头衔之后，很多好友都想提升自己的qq群等级头衔，那么要怎样做才会升级快呢？下面给大家分享提升q
- 在之前的教程中，我们为大家介绍了一些必应输入法的使用小技巧以及一些常用的操作。今天我们将为大家介绍一个必应输入法的特色功能，那就是V模式功能
- 微软正式发布了HoloLens 2混合现实设备，带来了更好的沉浸感、佩戴舒适感等。微软HoloLens 2在沉浸感方面大幅增强，使全息影像更
- 迅雷11限速怎么解除？迅雷11故意限速如何解决？在日常生活中，我们下载东西的时候，经常需要使用到迅雷进行下载，但是使用迅雷下载的时候，却被限
- 导语：PPT主要是做演讲与讲课的时候常常使用到，而我们常常要追求它的美观，分享一个PPT怎样设置多种文本颜色方法。详细步骤如下：1、启动Po
- win10能ping通但是不能上网怎么办？如果win10电脑能ping通内外网的话，正常情况下是可以上网的。不过最近就有小伙伴反应说win1
- 每次启动到桌面后，都会收到一个提示：Windows检测到一个硬盘问题，请立即备份文件以防信息丢失，这是怎么一个情况，该如何处理呢？遇到的朋友
- 在Win10系统中，搜索功能是自带的，搜索就是在索引基础上的，索引由索引器构建，系统占用系统资源以影响用户的工作以防止索引从建成。如果它检测
- word2010单行页边距怎么调整？word2010 如何调整单行页边距，在特定情况下要将某一行的文字向两边扩展，如何操作，下面我们一起来看
- Mac电脑的使用用户群体比较少，所以有许多技巧没有人知道。例如Mac到底可以连接多少个蓝牙音箱？很多人会回答最多两个同品牌的，其实不然，Ma
- 最近有window8.1系统用户反映，电脑打开IE浏览器提示“服务器正在运行中”，导致浏览器无法正常运行，该如何解决呢？下面脚本之家的小编带
- WinXP超级终端是一个非常有用的程序熟悉超级终端能让它们事半功倍，如果想学习超级终端的使用方法，可以看看下文为大家介绍的方法WinXP超级
- win10edge浏览器乱码怎么办？win10edge浏览器乱码一般情况下就是系统升级更新后的问题，也有可能是安装第三方字体，才会导致的乱码
- 你知道在wps表格里如何计算除法 吗?下面就让小编告诉你 wps表格计算除 的方法，希望对大家有所帮助。wps表格计算除法的方法比如就是算A
- 很多mac用户都在steam这个平台上遇见过无法打开steam社区的问题，这个情况该怎么解决呢?其实steam的错误都大同小异，由于stea
