我的word是2007版的,调整多页面多个图片大小、位置等操作比较麻烦,没有现成的批量调整工具。在网上看了高版本的word 批量调整图片格式还相对简单一些。 对于word2007 没有现成功能,我们用VBA宏代码来实现。
用豆包或者coze 平台生成VBA 宏代码,然后在word 中启用宏 进行运行调试, 如果报错,可以将报错信息返回输入给豆包或者coze具,让他们修改代码,然后再次尝试。(coze空间生成VBA宏代码图片如下:)
在coze平台输入提示词:写一段word2007的VBA宏代码,可以批量设置每个页的图片的高度是27cm,宽度是18.11cm;并且设置奇数页靠右边距0.5cm,偶数页靠左侧边距0.5cm,图片上下距中对齐。
coze空间会根据提示词生成VBA宏代码,并给出如何在word中运行。

复制上述代码内容,在Word 2007 中启用宏并粘贴运行代码。
VBA 宏的使用:
-
打开要处理的Word文档,按下快捷键"Alt+F11",进入VBA编辑器。
-
在VBA编辑器左侧找到"ThisDocument",双击打开。
-
将以下代码粘贴到代码窗口中(coze平台生成的代码部分内容):


- 按下"F5"键,或点击工具栏上的"运行"按钮,宏将自动设置图片大小和位置。
运行报错与调试:
以上内容运行如果报错,可以给Coze平台对话(具体报错内容发给Coze平台)例如:运行报错,If file <> imgFiles(imgFiles.Count) Then 无效的过程调用或参数;Coze平台会修改bug重新生成代码,再运行尝试。
另外,VBA宏操作Alt+F8 可以打开已经存在的宏代码,直接选择运行即可,如果要新增或者修改也可以点击相应按钮来实现。