使用 VBA 宏批量选择图片

✅ 第一步：创建 .dotm 加载项文件
1、使用环境
office word 365，文件格式为.docx
图片格式为.PNG

2、创建 .dotm 加载项文件

打开 Word，新建一个空白文档。
按下 Alt + F11 打开 VBA 编辑器。
点击菜单栏：插入一个模块（“插入” → “模块”）。

输入以下代码（代码只选择“嵌入式图片”（InlineShape），“浮动图片”（Shape））

Sub 全选图片()Dim s As ShapeDim ils As InlineShape' 选择所有嵌入式图片（InlineShape）For Each ils In ActiveDocument.InlineShapesils.SelectNext ils' 选择所有浮动图片（Shape）For Each s In ActiveDocument.Shapess.Select Replace:=FalseNext s
End Sub

3、测试运行效果

运行后选中所有图片按照单个图片修改格式即可

4、保存文件
点击 文件 → 另存为，选择类型为：
📁 Word 启动宏模板（*.dotm）
命名为：全选图片.dotm

✅ 第二步：将 .dotm 添加为 Word 加载项
在 Word 主界面点击菜单：
文件 → 选项 → 加载项。

在底部选择“管理：Word 加载项”，点击右侧【转到】。

在弹出的对话框中点击【添加】。

找到你刚刚保存的 .dotm 文件 → 打开。

勾选这个加载项 → 点击【确定】。

第三步（可选）：将宏添加到工具栏/自定义选项卡
在 Word 顶部点击右上角的下拉箭头 → 选择【更多命令】。

从左侧的“选择命令”下拉中选择【宏】。

找到你的 SelectAllPictures 宏，添加到右侧“快速访问工具栏”或自定义选项卡中。