当前位置:首页教育技巧word技巧Word技巧大全

word如何统一处理

2025-02-05 15:13:00


1.如何用Word宏操作处理图片?让所有图片统一操作?

方法如下:

1. 先打开存有图片的word。

2. 在打开的文档中,选择在“工具”菜单中选择“宏”--“宏”。

3. 随后弹出“宏”对话框,在宏名中输入setpicsize。

4. 宏名起好了,单击“创建”按钮进入Visual Basic 编辑器,输入代码。

5. 关闭入Visual Basic 编辑器,返回word,重新选择“工具”--“宏”--“宏”(或者直接按Alt+F8),再次进入宏的界面,在弹出的宏名中选择"setpicsize",最后点击“运行”---确认即可快速地批量修改word中所有图片大小。

2.word怎么批量处理相片

在Word中,同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:

Sub xx()

Dim xPic As InlineShape

For Each xPic In ThisDocument.InlineShapes

xPic.LockAspectRatio = msoTrue

xPic.Width = xPic.Width / 2

Next

End Sub

在此界面直接按F5运行此宏,图片大小变为原来的1/4。如果想变为原来的1/9,请把粗体的2改为3.

能帮到你的话,望采纳最佳哦。

3.word中如何将大量图片批处理统一的尺寸大小

设置图片高度为 99px ActiveDocument.InlineShapes(n).Height = 99 '忽略错误 For n = 1 To ActiveDocument:(之后单击运行即可) Dim n '.Width = 71 '; 在Sub 宏名()与End Sub之间编写如下代码;设置图片宽度 71px Next n For n = 1 To ActiveDocument;InlineShapes类型图片 ActiveDocument.InlineShapes.Shapes.InlineShapes(n);设置图片高度为 99px ActiveDocument.Width = 71 '.Shapes(n),输入宏名——(非数字)——创建.Height = 99 '.Shapes(n)选择工具——宏——宏(Alt+F8调出宏编辑窗口).Count '图片个数 On Error Resume Next 'Shapes类型图片 ActiveDocument.Count '。

相关信息


电脑版

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2025 www.at317.com All Rights Reserved .