一个word文档中，多个表格的批量调整（根据窗口调整表格和添加表格水平线）
生活随笔
收集整理的这篇文章主要介绍了
一个word文档中，多个表格的批量调整（根据窗口调整表格和添加表格水平线）
小编觉得挺不错的,现在分享给大家,帮大家做个参考.
Sub 自动调整所有表格()
'
' 自动调整所有表格 宏
'
'Application.Browser.Target = wdBrowseTableFor i = 1 To ActiveDocument.Tables.CountWith ActiveDocument.Tables(i).AutoFitBehavior (wdAutoFitWindow) '根据窗口调整内容.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter '水平居中.Range.ParagraphFormat.Alignment = wdCellAlignVerticalCenter '垂直居中.Borders(wdBorderHorizontal).LineStyle = wdLineStyleInset '加水平线End WithNext iEnd Sub
打开word文档，选择开发工具，点击宏。弹窗之后新建宏，输入以上命令，运行即可。
总结
以上是生活随笔为你收集整理的一个word文档中，多个表格的批量调整（根据窗口调整表格和添加表格水平线）的全部内容，希望文章能够帮你解决所遇到的问题。
- 上一篇： 2048小游戏 c++
- 下一篇： 练习2-3 输出倒三角图案（打印图案）