一、老例要道dddd28.com

在Word文档中思要快速的赈济图片大小，最常见的要道即是F4键，具体操作如下动图，咱们需要先点击1个图片，然后点击鼠标右键找到属性，不要勾选【锁定纵横比】之后设置长度和宽度

设置好一个之后，选中其他的图片，按下F4键，来一个一个的设置。

这个要道数目少了还行，数目多了，键盘皆得按包浆了，这个时分就要请出DeepSeek了

图片

二、代码编写dddd28.com

向DeepSeek商酌：

如安在Word文档中，使用vba代码将扫数图片大小皆修改为宽6cm高4cm

稍等下就会给出如下的代码，这个代码只需修改4处，用于设置图片的高度与宽度，6是长度，4是宽度，字据我方的需要来设置即可

Width = 6 * 28.35

男同打屁股

Height = 4 * 28.35

Sub SetPicSizeTo6x4()    Dim n As Integer    '惩处镶嵌型图片(InlineShapes)    For n = 1 To ActiveDocument.InlineShapes.Count        With ActiveDocument.InlineShapes(n)            .LockAspectRatio = False  '拆除纵横比锁定‌:ml-citation{ref="1，5" data="citationList"}            .Width = 6 * 28.35        '6cm改造为磅(1cm=28.35磅)‌:ml-citation{ref="1，8" data="citationList"}            .Height = 4 * 28.35       '4cm改造为磅‌:ml-citation{ref="1，8" data="citationList"}        End With    Next n    '惩处浮动型图片(Shapes)    For n = 1 To ActiveDocument.Shapes.Count        With ActiveDocument.Shapes(n)            .LockAspectRatio = False  '‌:ml-citation{ref="5，8" data="citationList"}            .Width = 6 * 28.35            .Height = 4 * 28.35        End With    Next nEnd Sub

三、代码粘贴

只需翻开Word文献，然后点击【征战器具】找到【VisualBasic】在窗口的左侧点击空缺区域，之后点击鼠标右键找到【插入】选拔【模块】将代码粘贴到右侧，终末按下F5键来驱动这个VBA代码，即可杀青批量的修改图片大小。

图片

至此设置收场，Word的VBA代码一般皆比拟粗造，DeepSeek来写代码正确率皆是比拟高的，群众不错试一下，之前一些重迭性的责任皆不错编写为代码，暂劳永逸！

四、参考视频

图片

ENDdddd28.com

坚握创作不易，点个“在看”提拔下吧~👇👇 本站仅提供存储就业，扫数本色均由用户发布，如发现存害或侵权本色，请点击举报。