在编辑Word文档时,经常需要插入多张图片。但不同来源的图片尺寸不一,手动一张张调整非常耗时。本文将介绍几种实用方法,帮助你快速统一Word文档中所有图片的大小。
Ctrl + H 打开“查找和替换”对话框。^g(代表图形对象)。适合需要频繁处理大量图片的用户:
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
Ctrl 键,依次点击每张图片进行多选。