结合AI工具和VBA宏代码批量调整word2007文档中的多个图片

我的word是2007版的，所以调整多页面多个图片大小、位置等操作比较麻烦，没有现成的批量调整工具。我在网上看了高版本的word 批量调整图片格式还相对简单一些。 对于word2007 没有现成功能，我们用VBA宏代码来实现。

我用豆包或者coze 平台生成VBA 宏代码，然后在word 中启用宏 进行运行调试， 如果报错，可以将报错信息返回输入给豆包或者coze具，让他们修改代码，然后再次尝试。

coze空间生成VBA宏代码

Word 2007 中启用宏并粘贴运行代码

VBA 宏的使用 例如：

在coze平台输入提示词：写一段word2007的VBA宏代码，可以批量设置每个页的图片的高度是27cm，宽度是18.11cm；并且设置奇数页靠右边距0.5cm，偶数页靠左侧边距0.5cm，图片上下距中对齐。

coze空间会根据提示词生成VBA宏代码，会给出如何在word中运行。我们复制这段代码。

1. 打开要处理的Word文档，按下快捷键“Alt+F11”，进入VBA编辑器。

2. 在VBA编辑器左侧找到“ThisDocument”，双击打开。

3. 将以下代码粘贴到代码窗口中：

coze平台生成的代码部分内容

4. 按下“F5”键，或点击工具栏上的“运行”按钮，宏将自动设置图片大小和位置。

运行报错与调试：

以上内容运行如果报错，可以给Coze平台对话（具体报错内容发给Coze平台）例如：运行报错，If file <> imgFiles(imgFiles.Count) Then 无效的过程调用或参数；Coze平台会修改bug重新生成代码，再运行尝试。

另外，VBA宏操作Alt+F8 可以打开已经存在的宏代码，直接选择运行即可，如果要新增或者修改也可以点击相应按钮来实现。