word文档如何批处理

1.word中的图片能批处理吗?

可以的，批处理图片一般利用“宏”功能实现。例如设置图片的大小，方法如下：

1、选择工具——宏——宏（Alt+F8调出宏编辑窗口）

2、输入宏名——（非数字）——创建

3、在Sub 宏名（）与End Sub之间编写如下代码：

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片

ActiveDocument.InlineShapes(n).Height = 99 '设置图片高度为 99px

ActiveDocument.InlineShapes(n).Width = 71 '设置图片宽度 71px

Next n

For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片

ActiveDocument.Shapes(n).Height = 99 '设置图片高度为 99px

ActiveDocument.Shapes(n).Width = 71 '设置图片宽度 71px

Next n

4、关闭窗口，按Alt+F8，从宏中选择刚才定义的宏“Zdy"，然后单击右侧的”运行“即可。

2.word怎样批量处理图片大小啊

使用VBA:

Dim i

On Error Resume Next

For i=1 To ActiveDocument.InlineShapes.Count

ActiveDocument.InlineShapes(i).Height=300 '修改为自己需要的值

ActiveDocument.InlineShapes(i).Width=200 '修改为自己需要的值

Next

For i=1 To ActiveDocument.Shapes.Count

ActiveDocument.Shapes(i).Height=300 '修改为自己需要的值

ActiveDocument.Shapes(i).Width=200 '修改为自己需要的值

Next

3.word中如何将大量图片批处理统一的尺寸大小

设置图片高度为 99px ActiveDocument.InlineShapes(n).Height = 99 '忽略错误 For n = 1 To ActiveDocument：（之后单击运行即可） Dim n '.Width = 71 '； 在Sub 宏名（）与End Sub之间编写如下代码；设置图片宽度 71px Next n For n = 1 To ActiveDocument;InlineShapes类型图片 ActiveDocument.InlineShapes.Shapes.InlineShapes(n)；设置图片高度为 99px ActiveDocument.Width = 71 '.Shapes(n)，输入宏名——（非数字）——创建.Height = 99 '.Shapes(n)选择工具——宏——宏（Alt+F8调出宏编辑窗口）.Count '图片个数 On Error Resume Next 'Shapes类型图片 ActiveDocument.Count '。