word表格格式统一设置宽度教程

2017-06-06

Word表格可根据窗口自动调整表格宽度,使得所有的表格宽度和页面宽度一样。当页面设置了新的页边距后,所有的表格都需要调整新的宽度。下面给大家分享word批量修改表格的宽度的方法。

word批量修改表格的宽度的方法

第一步:打开Word文档,按下【Alt + F11】

第二步:在VBA编辑器窗口的左上方,双击【ThisDocument】

第三步:在右侧选择【Document】,再在其右侧下拉选择【Open】

第四步:然后在宏代码编辑窗口中,Document_Open()下面输入以下代码

Application.Browser.Target = wdBrowseTable

For i = 1 To ActiveDocument.Tables.Count

ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitContent) '根据内容自动调整表格

ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitWindow) '根据窗口自动调整表格

ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter '水平居中

ActiveDocument.Tables(i).Range.ParagraphFormat.Alignment = wdCellAlignVerticalCenter '垂直居中

Next i

第五步:点击左上方的保存图标。

第六步:在弹出的窗口中,点击【否】,如果文档已经启用了宏,就不会出现这个提示对话框了。

第七步:将文档另存为【启用宏的 Word 文档】,然后关闭VBA编辑器和当前文档。

第八步:找到你刚刚保存的启用宏的Word文档,双击打开,启用宏的Word文档的图标上,会有一个感叹号。

第九步:点击【启用内容】,宏代码开始运行。

第十步:您会发现,Word中的所有表格,都会自动调整其宽度与页面宽度一样啦,而且表格中的内容都居中对齐了。如果不希望居中对齐,就将宏代码中的水平居中和垂直居中两行去掉。

猜你感兴趣:

1.word怎样批量修改表格的宽度

2.Excel中表格快速统一设置行列宽度的操作方法

3.word2013表格边框如何设置统一样式

4.怎么调整word表格的高度和宽度

5.Word怎么调整表格宽度

更多相关阅读

最新发布的文章