WORD宏,把所有表格则设置 缩进为0,居中对齐。
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 '取消取行缩进
Next
End Sub
。全部
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 '取消取行缩进
Next
End Sub
。收起