如何在Microsoft Word中使所有的图片都变成同一大小

已收录   阅读次数: 1,518
2020-01-0510:00:00 发表评论
摘要

想象一下,想在Word文档中插入多个图像。插入时,图片的大小不同,但是您希望它们在文档中的大小相同。尽管可以使用适当的照片编辑工具,但有时却无权使用它们。在这种情况下,您可以使用Microsoft Word本身来调整所有图片的大小。 经验分享给大家,于是就有了今天这篇文章……

分享至:
如何在Microsoft Word中使所有的图片都变成同一大小

开篇寄语

想象一下,想在Word文档中插入多个图像。插入时,图片的大小不同,但是您希望它们在文档中的大小相同。尽管可以使用适当的照片编辑工具,但有时却无权使用它们。在这种情况下,您可以使用Microsoft Word本身来调整所有图片的大小。 经验分享给大家,于是就有了今天这篇文章。

经验分享

有时,我们希望我们有一个按钮,按下该按钮将自动执行困难的任务。这就是Word中宏的作用。

宏会自动执行某些任务,否则将需要您重复执行该任务。您可以通过记录要执行的步骤或编写一组指令来创建宏。

由于我们需要调整MS Word中所有图片的大小,因此我们将借助宏。我们将通过编写代码来调整照片大小来创建它。不要感到困惑。详细步骤如下:

  1. 打开Word文件,您要在其中制作所有大小相同的图片,插入几张大小不同的图片。
  2. 点击文件中的第一张照片将其选中。然后,单击顶部的“视图”选项卡。 如何在Microsoft Word中使所有的图片都变成同一大小
  3. 单击宏。
    如何在Microsoft Word中使所有的图片都变成同一大小
  4. 将弹出一个窗口。在宏名称下的框中键入名称。您可以命名任何东西。为了便于理解,我们将其称为“调整大小”。然后,点击创建。
  5. 将打开一个新的Microsoft Visual Basic for Applications窗口。选择现有代码并将其删除。
  6. 然后,将以下代码复制并粘贴到窗口中。调节500和600,改变数字就可以了。
       Sub resize()
       Dim i As Long
       With ActiveDocument
       For i = 1 To .InlineShapes.Count
       With .InlineShapes(i)
       .Height = 500
       .Width = 600
       End With
       Next i
       End With
       End Sub
  1. 复制后,通过单击十字图标关闭Microsoft Visual Basic for Applications窗口。
  2. 选择图像后,再次单击“视图”选项卡下的“宏”。
  3. “宏”窗口将打开。单击运行并选择您的宏。 如何在Microsoft Word中使所有的图片都变成同一大小
  4. 按下“运行”按钮后,您会注意到所有图像的尺寸都会改变。
如何在Microsoft Word中使所有的图片都变成同一大小

  • 我的微信
  • 微信扫一扫加好友
  • weinxin
  • 我的微信公众号
  • 扫描关注公众号
  • weinxin

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: