如何调整Word中所有/多个图像的大小?
从互联网或其他文件复制或导入图像时,这些图像的大小可能会有很大差异。虽然逐张调整图片大小是一项常见任务,但对多张图片进行调整可能会很耗时。本教程将指导您完成几种方法,从调整单张图片的大小开始,然后介绍如何高效地调整多张图片的大小。
使用 Kutools for Word 一次调整多个图像的大小
在Word中手动调整图像大小
- 选择一张图片来显示其尺寸控点。
- 拖动任意尺寸手柄,直到图片达到所需的尺寸。
备注:此方法不允许您同时调整多张图片的大小。您需要分别调整每张图片的大小。
使用 VBA 将图像大小调整为特定尺寸
使用以下 VBA 代码,您可以将图片大小调整为理想大小。下面的示例显示如何将图片大小调整为 1.78 英寸高和 3.17 英寸宽。
- 请选择您想要调整大小的图片。
- 媒体 Alt + F11键 打开 Microsoft Visual Basic应用程序 窗口。
- 点击 模块 来自 插页 选项卡,然后将以下 VBA 代码复制并粘贴到 模块 窗口。
Sub ResizePics() Dim shp As Word.Shape Dim ishp As Word.InlineShape If Word.Selection.Type <> wdSelectionInlineShape And _ Word.Selection.Type <> wdSelectionShape Then Exit Sub End If If Word.Selection.Type = wdSelectionInlineShape Then Set ishp = Word.Selection.Range.InlineShapes(1) ishp.LockAspectRatio = False ishp.Height = InchesToPoints(1.78) ishp.Width = InchesToPoints(3.17) Else If Word.Selection.Type = wdSelectionShape Then Set shp = Word.Selection.ShapeRange(1) shp.LockAspectRatio = False shp.Height = InchesToPoints(1.78) shp.Width = InchesToPoints(3.17) End If End If End Sub
请注意: 在上面的代码中, ishp.高度 = 英寸到点 (1.78) 和 shp.Width = InchesToPoints(3.17) 定义图片的高度和宽度(以英寸为单位)。您可以根据需要更改这些值。
- 点击 运行 按钮或按下 F5 运行 VBA 代码。所选图像将调整为指定尺寸。
虽然此 VBA 代码很有用,但它无法一次调整所有或多个图片的大小。您需要在 Word 文档和 Microsoft Visual Basic应用程序 窗口选择并调整每张图片的大小,这可能很耗时。在这种情况下,请使用以下方法。
使用 Kutools for Word 批量调整所有图像大小
与 Word 的 Kutools's 调整图像大小 实用程序,您可以摆脱那些烦人且耗时的操作,并快速调整文档中所有图像的大小。
1。 请通过单击应用此实用程序 Kutools 加 > 调整大小。 看截图:
2。如果您希望将所有图片调整为原始尺寸的一定百分比,请从下拉列表中选择六个百分比之一。例如,如果您希望将所有图片调整为原始尺寸的 50%,请选择 50% 。 点击后 50% ,您将看到所有图片的大小已调整为50%。 看截图:
如果要将所有图片调整为与所选图片相同的大小,请选择一张图片作为模型尺寸,然后单击 Kutools 加 > 调整大小 > 通过选择调整图像大小,并且所有图像将根据所选图像调整为相同的大小,见截图:
有关更多详细信息 Kutools for Word“ 调整图像大小 实用程序,请 点击此处阅读完整指南并查看分步说明.
演示:如何在 Word 中调整图像大小
通过 库工具 / Kutools 加 此视频中的标签来自 Kutools for Word. 享受 100 多种功能和永久免费的 AI 实用程序。 现在下载!
最佳办公生产力工具
Kutools for Word - 通过 Over 提升您的文字体验 100 显着特点!
🤖 Kutools AI功能: 生成内容 / 重写文本 / 文档问答 / 快速获得答案 / 翻译文件 / 波兰文档(保留格式)...
📘 文档掌握: 分页 / 合并文件 / 以各种格式导出选择(PDF/TXT/DOC/HTML...) / 批量转换为PDF...
✏ 内容编辑: 跨多个文件批量查找和替换 / 调整所有图片的大小 / 转置表行和列 / 将表格转换为文字...
🧹 轻松清洁:扫除 多余的空间 / 分节符 / 文本框 / 超链接 / 如需更多移除工具,请访问 删除 团体...
➕ 创意插入: 插 千位分隔符 / 复选框 / 单选按钮 / 扫码支付 / 条码 / 多张图片 / 了解更多 插页 团体...
🔍 精准选择:精确定位 特定页面 / 表 / 形状 / 标题段落 / 增强导航功能 更多 选择 功能...
⭐ 星级增强: 导航到任何位置 / 自动插入重复文本 / 在文档窗口之间切换 / 11 转化 工具...