WPS PPT批量替换图片的实用技巧，3种方法+2个问答，让换图从此不求人

WPS_Office wps文章 2026-08-04 1

目录导读

WPS PPT批量替换图片的实用技巧，3种方法+2个问答，让换图从此不求人-第1张图片-WPS-WPS下载【官方网站】

为什么要批量替换图片？
利用“查找替换”功能批量换图（部分版本可用）
母版级联替换——适合固定模板快速更新
VBA宏命令——真正“万能”的批量替换
常见问答（Q&A）

在WPS演示（俗称WPS PPT）中，图片是PPT的灵魂，但在日常办公中，我们经常遇到这样的痛点：一套做好的PPT需要更换所有配图，比如把临时用的“占位图”换成正式产品照，或者把公司旧logo批量改成新logo，如果一张张右键“更改图片”，少则几十次，多则上百次，不仅效率低下，还容易漏换、错换。
本文结合网络上的零散经验和笔者的实操测试，为你总结出3种“批量替换图片”的可行方案，帮助你用最短的时间完成最繁琐的换图工作，文章末尾还附带了两个高频问题解答,绝对干货。

为什么要批量替换图片？

先看实际场景：

你从网上下载了一套带“水印”或“样例图”的PPT模板，需要把所有示例图替换为自己的真实图片。
公司统一更换品牌Logo，旧PPT文件数量庞大，每页都有旧Logo，需要全部更新。
制作多语言版本时，需要把PPT中的截图、插画批量替换为对应语言的版本。

如果手动逐张替换，不仅费时，还可能因为疏忽漏掉隐藏幻灯片中的图片，而“批量替换”能一次性完成任务，让PPT更新变得像“查找替换文字”一样简单。

方法一：利用“查找替换”功能批量换图（部分版本可用）

很多用户不知道，WPS演示其实内置了类似Word的“查找替换”功能，并且支持对图片对象进行查找和替换,操作路径如下：

打开你的PPT文件，按快捷键 Ctrl + H 调出“替换”对话框。
在“查找内容”右侧，点击下拉箭头，选择“图片”（如果没有，可先点击“更多”展开高级选项）。
在“替换为”右侧，同样选择“图片”，此时会弹出一个“选择图片”窗口，从本地选择目标新图片。
点击“全部替换”按钮，系统会自动扫描当前演示文稿中的所有图片对象，并将它们全部替换为刚才选中的那张新图片。
替换完成后，WPS会弹出提示“共替换X处”，点击“确定”即可。

注意事项：

这个方法会把所有图片都替换成同一张图，如果你希望不同的图片换成不同的新图，则需要先使用“替换图片”功能逐张完成，或者使用下面的VBA方法。
部分WPS版本（尤其是较早版本）的下拉菜单中可能没有“图片”选项，这时请直接使用方法三。
替换后，新图片会自动适应原图片的尺寸和位置，但比例可能会拉伸,需要手动微调。

方法二：母版级联替换——适合固定模板

如果你的PPT中，所有图片都位于“幻灯片母版”或“版式”中（每页的右上角都有同一个Logo，或者固定位置的装饰图）,那么替换就变得非常简单：

点击“视图”选项卡，选择“幻灯片母版”，进入母版编辑状态。
在左侧缩略图中，找到包含需要替换图片的母版版式（通常第一张为总母版，改它能作用于所有页面）。
点击选中那张图片，按 Delete 键删除，或者右键选择“更改图片”替换为新的。
关闭母版视图，你会看到所有引用该母版的幻灯片都自动更新了图片。

这种方法的优势是：一次修改，全局生效，而且不会影响正文中的图片，但只适用于“位置固定、由母版控制”的图片,对每页独立插入的图片无能为力。

方法三：VBA宏命令——真正“万能”的批量替换

如果你的WPS版本不支持“查找替换图片”，或者你需要更灵活的替换规则（例如只替换前5页、只替换某张特定尺寸的图片），那么可以用VBA宏来实现,这也是老手最常用的方法。

第一步：打开宏编辑器
在WPS演示中，按快捷键 Alt + F11 打开Visual Basic编辑器（如果没有菜单，请确认安装的是完整版WPS，并已启用宏功能）。
第二步：插入模块并复制代码
在左侧工程资源管理器中，右键点击“VBAProject”，选择“插入”→“模块”,然后在空白代码区粘贴以下代码：

Sub ReplaceAllPictures()
    Dim slide As slide
    Dim shape As Object
    Dim newPicPath As String
    ' 修改为你的新图片完整路径，"D:\新图.jpg"
    newPicPath = "D:\NewImage.jpg"
    If Dir(newPicPath) = "" Then
        MsgBox "图片路径不存在，请检查！"
        Exit Sub
    End If
    For Each slide In ActivePresentation.Slides
        For Each shape In slide.Shapes
            ' 判断是否为图片对象
            If shape.Type = 13 Then ' 13代表msoPicture
                shape.Fill.UserPicture newPicPath
            End If
        Next shape
    Next slide
    MsgBox "全部图片替换完成！"
End Sub

第三步：运行宏
按 F5 运行代码，稍等片刻，所有图片都会被替换成 newPicPath 指定的图片，你还可以修改代码,实现更多高级功能：

只替换活动窗口中的图片：将 ActivePresentation.Slides 改为 SlideShowWindows(1).View.Slide 等。
按图片宽度筛选：在if判断中增加 shape.Width > 100 等条件。
替换多张图：通过字典映射旧图名称到新图路径，实现“不同图替换为不同图”。

提醒： 运行宏前请务必保存并备份原文件，避免误操作导致图片丢失，由于WPS对宏支持较好,这是最稳定可靠的批量替换方案。

常见问答（Q&A）

Q1：批量替换图片后，新图片会保持原有圆角、阴影等样式吗？
答：这取决于替换方式，如果用“方法一”的查找替换，本质是“换图”，图片所在的形状样式（圆角、边框、阴影）会保留，但新图可能被拉伸变形，如果用VBA的 Fill.UserPicture 替换，实际上是给原图片区域“重新填充图片”，这会把原来的纯图片变成“填充图片”，可能导致某些图片样式（比如图片本身的“图片样式”）丢失，但形状本身的特效（如阴影）仍会保留，如果对样式要求极高,建议先测试一个小文件。

Q2：如何只批量替换PPT中某几页的图片？
答：使用VBA最灵活,将代码中的循环改为：

For Each sld In ActivePresentation.Slides
    If sld.SlideIndex >= 3 And sld.SlideIndex <= 5 Then
        ' 执行替换
    End If
Next

这样只会替换第3页到第5页的图片，如果你使用的是“方法一”，则无法选择页数,它会替换所有页面。

WPS PPT批量替换图片，看似是一个小众需求，但遇到时真的能让工作效率提升一个档次。
本文综合了网上各类经验，并结合实际测试，整理了“查找替换”“母版级联”“VBA宏”三种方法，并给出了简洁的问答。
如果你经常处理PPT，建议收藏本文，并在电脑里提前准备好VBA代码片段，说不定哪天就能用上。
如果你在操作中遇到其他问题，欢迎在评论区留言，我们会共同探讨解决,赶紧去试试批量替换图片的新技能吧！

标签： PPT图片

本文地址： https://wps-jvip.com.cn/post/3953.html