你好,今天在Word文档中,我将告诉你如何大量设置各种表的宽度和高度。以下文档包含四个表。表的大小不匹配。我将所有表格的总宽度设置为15厘米,表格中每一行的高度设置为2厘米。
(如果你的文件里有更多的票数,也可以使用下面的代码。)。
程序:
1.在“文档”窗口上方的“开发工具”选项卡“代码功能”组中,单击“Visual Basic”按钮。
2.在弹出式VBA编辑器窗口中执行“插入-模块”命令。窗口中间将出现“编辑代码”窗口。
3.在“编辑代码”窗口中输入以下代码:
子批次选取所有表单()
Dim tempTable As Table
A=False
If Ac=wdAllowOnlyFormFields Then
“MsgBox”文档受保护,现在无法选择多个表单!”单击“”
Exit Sub
End If
Ac wdEditorEveryone
For Each tempTable In Ac
WdEditorEveryone
next
Ac wdEditorEveryone
Ac wdEditorEveryone
A=真
End Sub
4.单击窗口顶部工具栏中的“启动子过程/用户屏幕”按钮(右方向的绿色三角形符号),选择所有文档中的表。
5.在“.
6.婓粟堤腔“桶迹扽俶”勤赶遗笢遥善“桶迹”恁砐绉甜蔚“湮苤”扢离峈“硌隅遵仅”“15厘米”﹝。切换回“行”选项卡,将大小设置为2厘米(行高值是固定值),然后单击“确定”按钮。
7.回到文件上,所有表格都统一成我们想要的大小,可以看到每张表格的总宽度为15厘米,每行的高度为2厘米。
我们的共享到此为止。谢谢你的阅读。谢谢你的关心。一起学习更多的办公技能!#office办公室技术#