段落对齐及缩进的设置 段落左右缩进字符怎么设置( 二 )


Sub mynzD()
‘为活动文档的首段设置 1 英寸的首行缩进 。
ActiveDocument.Paragraphs(1).FirstLineIndent = InchesToPoints(1)
‘为活动文档的第二段设置 0.5 英寸的悬挂缩进 。
ActiveDocument.Paragraphs(2).FirstLineIndent = InchesToPoints(-0.5)
End Sub
代码截图:

段落对齐及缩进的设置 段落左右缩进字符怎么设置


代码解读:(略)
代码的运行,在代码运行前,我们先看看界面的截图:

段落对齐及缩进的设置 段落左右缩进字符怎么设置


代码运行后:

段落对齐及缩进的设置 段落左右缩进字符怎么设置


今日内容回向:
1 段落对象的 Alignment 属性及 CharacterUnitFirstLineIndent 属性、CharacterUnitLeftIndent 属性、CharacterUnitRightIndent 属性、FirstLineIndent 属性的意义是什么?
2 如何利用上述属性设置文档的段落?
本讲内容参考程序文件:Doc 004 文档.docm

段落对齐及缩进的设置 段落左右缩进字符怎么设置


我 20 多年的 VBA 实践经验,全部浓缩在下面的各个教程中:

段落对齐及缩进的设置 段落左右缩进字符怎么设置


推荐阅读