WORD宏，把所有表格则设置缩进为0，居中对齐。

4年前 (2020-08-30)阅读688回复0

楼主

印刷厂直印加工●彩页1000张只需要69元●名片5元每盒-更多产品印刷报价➦联系电话：138-1621-1622（微信同号）

这个不用宏，直接用格式刷就能办到。

弄好了一个格子的坐缩进，双击格式刷，刷其他的所有（拉黑）即可。下面的表格也带着刷子去操作一下就行了。

用宏，才有点罗嗦。

Sub aa_no_indent_table表缩进为0()

Dim ss As Table 'aa_no_indent_table表缩进为0

For Each ss In ActiveDocument.Tables

ss.Range.ParagraphFormat.CharacterUnitFirstLineIndent = 0 '取消字符单位的首行缩进

ss.Range.ParagraphFormat.FirstLineIndent = 0 '取消取行缩进

End Sub

踩0

☆收藏0

WORD宏，把所有表格则设置 缩进为0，居中对齐。