去掉文件页眉上的那条线的方法:首先在Word菜单栏中依次单击格式样式和格式命令,打开样式和格式界面;然后在格式列表中单击页眉选项,并选择修改选项;最后单击设置区域的无选项,并......
2021-06-25 267 word,怎样,去掉,文件,页眉,上,的,那条,线,去掉,
今天跟大家分享如何在Word文档中批量设置不同表格的宽度和高度。下图文档中有4个表格,表格的尺寸不一致,下面我们想将所有表格整体宽度设置为15厘米,表格每行行高设为2厘米。
(如果大家的文档中表格数量更多,下文中的代码也是可以使用的。)
操作步骤:
1.在文档窗口上方的“开发工具”选项卡“代码”功能组中单击“Visual Basic”按钮。
2.在弹出的VBA编辑器窗口中执行“插入”-“模块”命令,此时在窗口中央会弹出一个代码编辑窗口。
3.在代码编辑窗口中输入如下代码:
Sub 批量选择所有表格()
Dim tempTable As Table
Application.ScreenUpdating = False
If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then
MsgBox "文档已保护,此时不能选中多个表格!"
Exit Sub
End If
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
For Each tempTable In ActiveDocument.Tables
tempTable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub
4.单击窗口上方工具栏中的“运行子过程/用户窗体”按钮(方向向右的绿色三角符号),这样所有文档中的表格都会被选中。
5.在“表格工具”“布局”选项卡“表”功能组中单击“属性”按钮。
6.在弹出的“表格属性”对话框中,切换到“表格”选项卡,将“尺寸”设为“指定宽度”“15厘米”;再切换到“行”选项卡,将“尺寸”设为“指定高度”“2厘米”(行高值为固定值),单击“确定”按钮。
7.返回文档,可见所有表格已经统一为了我们想要的尺寸,每个表格整体宽度15厘米,每行行高2厘米。
标签: 如何 统一 调整 word 文档 中 所有 表格 的
相关文章
去掉文件页眉上的那条线的方法:首先在Word菜单栏中依次单击格式样式和格式命令,打开样式和格式界面;然后在格式列表中单击页眉选项,并选择修改选项;最后单击设置区域的无选项,并......
2021-06-25 267 word,怎样,去掉,文件,页眉,上,的,那条,线,去掉,
word中设置字体效果为礼花绽放的方法: 1、选中需要设置字体效果的段落,点击工具栏上面的格式选项,并选择字体。 2、单击鼠标右键,弹出快捷菜单,选择字体命令,如图所示; 3、弹出字......
2021-06-25 394 word礼花绽放效果
解除word图形纵横比锁定: 1、打开的WORD文档中,图形已被锁定纵横比。 2、鼠标单击选中图片,点击鼠标右键,在弹出的右键菜单中点击设置对象格式。 3、然后,弹出设置对象格式对话框,在......
2021-06-25 913 word锁定纵横比
文档中的一些内容需要突出显示,一般来说,Word突出显示文本有三种基本方法。 第一种:把字体加大加粗; 第二种:以不同颜色显示突出的文本; 第三种:突出显示的文本加高亮的背景色;......
2021-06-25 256 word,文档,编辑,中,如何,突出,显示,的,某些,
在使用Word文档的过程中,我们有时会需要插入带圈字符,但是有的朋友可能会遇到这样的问题:插入带圈字符后,阿拉伯数字不在圆圈的正中间(参见下图),遇到这种情况该怎么办呢? 解决......
2021-06-25 424 word,输入,带圈,字符,时,数字,不在,圆圈,正,在,