一、成例身手
迷晕水的制作方法在Word文档中思要快速的调解图片大小,最常见的身手即是F4键,具体操作如下动图,咱们需要先点击1个图片,然后点击鼠标右键找到属性,不要勾选【锁定纵横比】之后缔造长度和宽度
迷水商城缔造好一个之后,选中其他的图片,按下F4键,来一个一个的缔造。
迷水商城迷水商城这个身手数目少了还行,数目多了,键盘齐得按包浆了,这个工夫就要请出DeepSeek了
迷水商城图片
迷水商城二、代码编写
迷水商城迷水商城向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来写代码正确率齐是相比高的,公共不错试一下,之前一些重叠性的职责齐不错编写为代码,暂劳永逸!
四、参考视频
图片
END
坚合手创作不易,点个“在看”复旧下吧~👇👇 本站仅提供存储作事,通盘本体均由用户发布,如发现存害或侵权本体,请点击举报。