word 图片怎么批量调整大小

时间:2023-01-06 05:34:35 

在我们使用Word编辑时会插入大量的图片文件,当然这些图片大小一般是不一致的,通常插入到文档后都需要手动调整,如果说这些图片要调整统一大小,如何理解批量的调整大小呢?

1、打开插入图片的文档,点击切换到“视图”标签,点击“宏”-查看宏

word 图片怎么批量调整大小

2、在宏设置对话框,给这个宏起个名字,然后点击右侧的“创建”按钮

word 图片怎么批量调整大小

3、打开VBA编辑器,用找到的代码粘贴替换默认的代码:

1

2

3

4

5

6

7

8

Sub SetPicSize() '设置图片大小

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 类型 图片

ActiveDocument.InlineShapes(n).Height = 24 * 28.35 '设置图片高度为 24cm (1cm等于28.35px)

ActiveDocument.InlineShapes(n).Width = 14 * 28.35 '设置图片宽度 14cm

Next n

End Sub

标签:word图片批量调整大小
0
投稿

猜你喜欢

  • Word文档怎么自动编页码?

    2023-01-16 20:47:42
  • wps文字如何制作精美简历

    2023-06-06 03:50:51
  • Word添加箭头符号的方法步骤详解

    2023-11-04 20:20:24
  • Word简单画图的方法

    2023-04-30 12:50:11
  • 巧用WPS之音乐简谱的制作

    2023-11-29 18:45:19
  • word 2010 公式功能的设计、使用

    2023-10-25 04:57:15
  • 如何高效高速地下载苹果应用与游戏?

    2023-10-07 19:38:48
  • Win10修改msconfig后无法开机怎么办?修改msconfig后无法开机解决方法

    2023-11-21 22:41:56
  • word中怎么制作图片水印

    2023-02-15 01:39:09
  • 更新Win10出现立即卸载virtualBox此应用,因为他与win10不兼容怎么办?

    2023-11-25 17:43:04
  • office不打开文档,能快速查找文档的大小和修改时间吗?

    2023-11-09 05:52:52
  • 去除Word2007页眉横线的方法

    2023-11-28 20:12:25
  • Office中Word提高工作效率的技巧

    2023-12-08 03:08:01
  • word2007 如何实现奇数页是竖版,偶数页是横版

    2023-11-30 22:36:16
  • WORD调整表格中根据内容和根据窗口有什么区别?

    2023-12-16 09:08:59
  • 安装Office 2016启动Acrobat时出现无法找到入口错误怎么办?详细解决方法

    2023-08-21 10:40:31
  • Win10纯净版平板模式怎么分屏?

    2023-11-24 05:47:02
  • 涨知识:你不知道的win10系统使用小技巧

    2023-06-12 22:30:55
  • Word撰写毕业论文小技巧三则

    2022-04-22 03:40:24
  • 荣大云协作怎么使用 荣大云协作使用教程

    2023-06-03 13:43:56
  • asp之家 电脑教程 m.aspxhome.com