在撰写报告、论文或制作文档时,常常需要插入多张图片。但不同来源的图片尺寸不一,影响整体排版美观。本文介绍几种在 Microsoft Word 中统一修改所有图片尺寸的方法,助你快速完成专业排版。
若文档中图片较多,可使用 VBA 宏一键统一尺寸:
Alt + F11 打开 VBA 编辑器。Sub ResizeAllPictures()
Dim pic As InlineShape
For Each pic In ActiveDocument.InlineShapes
If pic.Type = wdInlineShapePicture Then
pic.LockAspectRatio = msoTrue
pic.Width = CentimetersToPoints(10) ' 设置宽度为10厘米
End If
Next pic
End Sub
修改 10 为你需要的厘米数,运行宏即可自动调整所有内嵌图片。
如需更灵活的编辑体验,可先将 Word 文档转为其他格式处理,或使用专业排版工具进行预处理后再导入 Word。