首先将需插入的图片排好序号放入任意文件夹,如c:usersadministratordesktop新文件夹
打开microsoft office powerpoint 2003 ——工具——宏——vb编辑器(快捷键alt+f11)
在弹出的窗口中点击——插入——模块——粘贴复制代码——关闭窗口代码如下:sub insertpic()dim i as integerfor i = 1 to activepresentation.slides.countactivepresentation.slides(i).selectwith activewindow.selection.sliderange.followmasterbackground = msofalse.background.fill.userpicture "c:usersadministratordesktop新文件夹图片" & i & ".jpg"end withnextend sub
划线处为文件地址 i 即文件序号
连续按ctrl+m键建立与图片数目相同或更多个空白幻灯片。按alt+f8键打开宏对话框,选中我们上面建立的insertpic宏,点击“运行”即可,100张图片很快就自动插入到幻灯片中
Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号