怎么把word的图片调整成一样的大小

发布网友 发布时间：2022-02-23 05:30

我来回答

共8个回答

热心网友 时间：2022-02-23 07:00

1、点击打开word软件，并同时打开需要调整的图片。这时我们可以看到word中的图片的大小都是不一致的，排版十分的凌乱，十分不美观。

2、选中第一张图片右键单击，选择调整图片的大小和位置。在弹出的设置框内勾选适合的值。

3、然后点击确定保存保存设置的值。返回word的页面，进行接下来的操作。

4、选中第二张图片。按键盘上的f4键，我们这时会发现图片的大小变成了和第一张图片一样的大小。然后依次进行操作。

热心网友 时间：2022-02-23 08:18

Word中批量设置插入图片的大小的方法如下：

1、在电脑桌面中双击Word快捷方式，或使用系统任务栏中的搜索栏搜索：word，随后点击搜索结果来打开word应用程序。

2、在打开word应用程序的软件界面右侧上方选择“空白文档”选项，系统会自动新建一个空白的文档。

3、在随后打开的软件界面上方选择“插入”选项卡，在随后打开的菜单组中选择“图片”按钮。

4、从自己的计算机中选择多张图片，并在对话框下部点击“插入”按钮。

5、任意选择一张图片，并右键选择该图片，点击“大小和位置”按钮。

6、在弹出的对话框中取消勾选“锁定纵横比”按钮。

7、随后更改高度和宽度的绝对值为统一值，点击“确定”后在文档界面按下键盘快捷键F4即可批量更改完成。

热心网友 时间：2022-02-23 09:52

批量将图片调整到相同尺寸大小，其实说实话PS也不是很好操作的。今天我们详细说明一下如何使用WORD来达到这一功能

方法/步骤

1.  打开WORD，在”工具“菜单下选择”选项“命令。

2.    在”选项“窗口中，在”编辑”选项卡下，将插入图片的格式选择为“四周型”，为什么要这么操作，因为我们默认插入图片的方式是嵌入式，使用“选择多个对象”命令时无法选择。

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

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

5.               在“绘图”工具栏中的“添加或删除按钮”中选择“选中多个对象”

6.               使用“选中多个对象”，将所有插入的图片全部选中。

7.               双击任意一图片，在弹出的对话框中，将图片设置一固定尺寸，并取消下方的”锁定纵横比“命令。

8.               这个时候你会发现所有的图片都变成了统一尺寸大小了。

9.               那么怎么样将这些图片导出来呢？在”文件“菜单中选择”另存为“命令。

10.           在”另存为“对话框中将保存类型设置为”网页“，最后点击”确定“按钮保存文件。

11.           打开刚刚保存的文件，右击在弹出的菜单选择以”大小“进行排序。

12.           大家可以发现，我们修改的后的图片都是相同的尺寸了。

13.    其实保存的文件中有一个原图和修改尺寸后的图，我以大小进行排序的话可以很快速将他们分离出来。

热心网友 时间：2022-02-23 11:44

我之前也是找不到直接的方法，就做了个宏命令

Sub setpicsize() '设置图片大小
Dim n '图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片
ActiveDocument.InlineShapes(n).LockAspectRatio = msoFalse
ActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300px
Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片
Selection.InlineShapes(n).LockAspectRatio = msoFalse
ActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400px
ActiveDocument.Shapes(n).Width = 340 '设置图片宽度 300px
Next n
End Sub

通过调整400----340的值，设置你的图片大小

热心网友 时间：2022-02-23 13:52

用宏命令：如下文字部分是解释说明，你只需要修改括号里面的13，改成你需要的大小就ok了。另外，你直接将打开的宏里面的所有代码删除，粘贴下列程序即可。

Sub InlineShapes1()
'注：本程序的作用为 一次性把所有图片大小全设为统一的大小。
picturecount = ActiveDocument.InlineShapes.Count '这里得出本文档里面的总图片数
For i = 1 To picturecount
ActiveDocument.InlineShapes(i).LockAspectRatio = msoFalse '这里设置是否锁定比例，若为msoflase则为不锁定，若为msoture为锁定，此处设为不锁定
ActiveDocument.InlineShapes(i).Width = CentimetersToPoints(13) '在这个括号里面填上 要设置的宽度 厘米数，例如 (13)代表宽度为 13厘米
ActiveDocument.InlineShapes(i).Height = CentimetersToPoints(13) '在这个括号里面填上 要设置的高度 厘米数，例如 (13)代表高度为 13厘米
Next
End Sub

热心网友 时间：2022-02-23 16:16

1、选中第1张图片，鼠标右键--大小和位置--将图片尺寸设置为你所需的大小。
2、选中第2张图片，按F4键。
3、选中第3张图片，按F4键。
4、……

热心网友 时间：2022-02-23 18:58

双击图片会出现图片工具栏，在图片高度中调到合适的高度，再复制高度，点击其他图片，粘贴在高度位置就行。

热心网友 时间：2022-02-23 21:56

只能一张一张的设置哦