乔山办公网我们一直在努力
您的位置:乔山办公网 > office365 > word里批量调整表格-office批量处理,office处理遵循

word里批量调整表格-office批量处理,office处理遵循

作者:乔山办公网日期:

返回目录:office365


可以的,批处理图片一般利用“宏”功能实现。例如设置图片的大小,方法如下:

1、选择工具——宏——宏(Alt+F8调出宏编辑窗口)

2、输入宏名——(非数e799bee5baa6e59b9ee7ad94338字)——创建

3、在Sub 宏名()与End Sub之间编写如下代码:
Dim n '图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片
ActiveDocument.InlineShapes(n).Height = 99 '设置图片高度为 99px
ActiveDocument.InlineShapes(n).Width = 71 '设置图片宽度 71px
Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片
ActiveDocument.Shapes(n).Height = 99 '设置图片高度为 99px
ActiveDocument.Shapes(n).Width = 71 '设置图片宽度 71px
Next n

4、关闭窗口,按Alt+F8,从宏中选择刚才定义的宏“Zdy",然后单击右侧的”运行“即可。



方法
1、打开这个文档,点击窗口上面的菜单“工具”-》“宏”-》“Visoual Basic编辑器”;
2、在弹出的VBE窗口中点窗口上面的菜单“插入”-》“模块”;
3、在VBE窗口的右下侧窗口内粘贴上如下代码:

Option Explicit

Sub 删除所有表格第8列()
Dim tbl As Table
Application.ScreenUpdating = False
For Each tbl In ActiveDocument.Tables
tbl.Columns(8).Delete
Next
Application.ScreenUpdating = True
End Sub

4、关闭VBE,返回文档窗口,点击窗口上面的菜单“工具”-》“宏”-》“宏”;
5、在弹出窗口中选择“删除所有表格第8列”,运行一下就好了。
我用的ADOBE ACROBAT 6.0 PROFESSIONAL,具体是这样操作的:
打开6.0,点击FILE-CREAT PDF-FROM MULTIPLE FILES
然后点击“ADD FILES”下面的BROWSE,把你要添加的文件加到右边的方框里点击OK就可以了,zd你可以自由调节文件的顺序。

希望可以帮到你。

对于你的问题有点难办,由于你word里有100多张,处理起来很不便。 1.你先将word里的图片保存到一个文件夹 在菜单栏的【文件】另存为,在【保存类型】那里选择【筛选的网页】,提示的窗口点击是。这样就自动保存图片到一个文件夹。 2.批量变换大小 光影魔术手可以解决你这个问题,官方下载网站: http:/// 3.将图片放回word中
打字不易,如满意,望采纳。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网