07版word如何统一巨细

1.如何统一配置word2007中图片名目,需要巨细沟通

Sub 统一图片尺寸（）

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes范例图片

ActiveDocument.InlineShapes(n).Height = CentimetersToPoints(2) '高度4cm

ActiveDocument.InlineShapes(n).Width = CentimetersToPoints(2) '宽度3cm

Next n

For n = 1 To ActiveDocument.Shapes.Count 'Shapes范例图片

ActiveDocument.Shapes(n).Height = CentimetersToPoints(2) '高度4cm

ActiveDocument.Shapes(n).Width = CentimetersToPoints(2) '宽度3cm

Next n

End Sub

上面是word中统一图片巨细的宏代码，但愿你能用得上。

代码中的图片尺寸巨细可以按照需要举办修改。

宏可以批量完成一个word中所有图片巨细的修改1、Alt F8调出宏编辑窗口 2、点建设按钮，建设新宏，setpicsize，内容如下： Sub setpicsize（) '配置图片巨细 ' 宏在 2008-3-31 由 hero_thm 录制 ' Dim j '计数图片个数 For j = 1 To ActiveDocument。

InlineShapes。Count '文件中图片总个数，图片范例为inlineshapes ActiveDocument。

InlineShapes(j)。Height = 362 '配置高度 ActiveDocument。

InlineShapes(j)。Width = 481。

87 '配置宽度 Next j End Sub 3、生存退出，点运行setpicsize宏，word中所有的图片统一调解为宽17cm，高12。 77cmSub setpicsize（)'配置图片巨细' 宏在 2008-3-31 由 hero_thm 录制'Dim j '计数图片个数For j = 1 To ActiveDocument。

InlineShapes。Count '文件中图片总个数，图片范例为inlineshapesIf ActiveDocument。

InlineShapes(j)。Width > 480 ThenActiveDocument。

InlineShapes(j)。Width = 400 '配置宽度End IfNext jEnd Sub。

东西/原料

word2007 电脑 win10

方式/步调

1、打开需要编辑的wold文档。

2、先选中一张图片，按住键盘的SHIFT键，再点击后两张图片。

3、在任意图片上右击，点击“巨细“。

4、弹出配置框，抖客教程网，打消勾选箭头所指位置。

5、在“尺寸和旋转”下的“高度”和“宽度”别离按照需要输入。

6、封锁配置框；文档中的图片统一被修改。

1.打开WORD，在”东西“菜单下选择”选项“呼吁。

2.在”选项“窗口中，在”编辑”选项卡下，将插入图片的名目选择为“附近型”，为什么要这么操纵，因为我们默认插入图片的方法是嵌入式，利用“选择多个工具”呼吁时无法选择。

3.在“插入”菜单中选择“图片”/“来自文件”

4.在“插入图片“对话框中选择要插入的图片。

5.在“画图”东西栏中的“添加或删除按钮”中选择“选中多个工具”

6.利用“选中多个工具”，将所有插入的图片全部选中。

7.双击任意一图片，在弹出的对话框中，将图片配置一牢靠尺寸，并打消下方的”锁定纵横比“呼吁。

8.这个时候会发明所有的图片都酿成了统一尺寸巨细了。