《VBA之Word应用》（版权10178982），是我推出第八套教程，教程是专门讲解VBA在Word中的应用，围绕“面向对象编程”讲解，首先让大家认识Word中VBA的对象，以及对象的属性、方法，然后通过实例让大家感受到Word VBA 的妙处。
这套教程是专门针对WORD VBA 的教程，是VBA中的稀缺资源，我给这套教程分归为中级教程，希望大家在VBA入门后再学习这套教程，这样会更加深入的理解面向对象编程的意义。
【分享成果，随喜正能量】348在努力之后松一口气而不是惴惴不安，这是一种成熟。在该拼搏的时候全情投入，该放松的时候学会释然。你只管做好力所能及的，后面的风景，不妨交给生活慢慢呈现。
第四章 段落集合Paragraphs对象及段落Paragraph对象大家好，我们这章的内容是段落集合Paragraphs对象及段落Paragraph对象。在Word的相关知识点中,段落是一块重要的内容,段落是组成文档的一部分。
什么是段落呢？段落就是包含一个段落标记以及所有位于此段落标记和前一个段落标记之间的文本（不包括前一个段落标记）。段落标记包含该段落的所有格式信息。当复制单词、句子和段落时，如果包含段落标记，则所有包含在段落标记中的格式信息也被复制，并在它们被粘贴到其它位置时应用于所属段落。
本章的内容的讲解仍是从对象的属性、方法来逐渐深入地讲解。
第五节 段落Paragraph对象的属性（一）段落Paragraph对象代表所选内容、范围或文档中的一个段落。段落对象是Paragraphs集合的成员，包含所选内容、范围或文档中的所有段落。这节我们仍是先从这个对象的属性开始讲解。
1 Paragraph.Alignment 属性该属性返回或设置一个WdParagraphAlignment常量，该常量表示指定段落的对齐方式。
语法：expression.Alignment
其中expression 是必需的。一个代表 "段落" 对象的变量
WdParagraphAlignment常量值：
wdAlignParagraphCenter 1 居中对齐。
wdAlignParagraphDistribute 4 段落字符被分布排列，以填满整个段落宽度。
wdAlignParagraphJustify 3 完全两端对齐。
wdAlignParagraphJustifyHi 7 两端对齐，字符高度压缩。
wdAlignParagraphJustifyLow 8 两端对齐，字符轻微压缩。
wdAlignParagraphJustifyMed 5 两端对齐，字符中度压缩。
wdAlignParagraphLeft 0 左对齐。
wdAlignParagraphRight 2 右对齐。
wdAlignParagraphThaiJustify 9 按照泰语格式布局两端对齐。
某些 WdParagraphAlignment 常数，具体取决于您所选择或安装的语言支持 (例如美国英语)。2 Paragraph.CharacterUnitFirstLineIndent 属性这个属性返回或设置首行或悬挂缩进的值 (以字符为单位)。 用正值设置首行缩进，并使用一个负值设置悬挂缩进。
语法：expression. CharacterUnitFirstLineIndent
其中expression 是必需的。一个代表 "段落" 对象的变量。
3 Paragraph.CharacterUnitLeftIndent 属性这个属性返回或设置指定段落的左缩进值 (以字符为单位)。
语法：expression. CharacterUnitLeftIndent
其中expression 是必需的。一个代表 "段落" 对象的变量。
4 Paragraph.CharacterUnitRightIndent 属性该属性该属性返回或设置指定段落的右缩进量（以字符为单位）
语法：expression. CharacterUnitRightIndent
其中expression 是必需的。一个代表 "段落" 对象的变量。
5 Paragraph.FirstLineIndent 属性该属性返回或设置首行的行或悬挂缩进的值 (以磅为单位)。 用正数设置首行缩进的尺寸，用负数设置悬挂缩进的尺寸
语法：expression. FirstLineIndent
其中expression 是必需的。一个代表 "段落" 对象的变量。
6 实例：Paragraph对齐及缩进下面我们将给大家介绍一段代码，这段代码将首先为活动文档的首段设置 1 英寸的首行缩进。然后为活动文档的第二段设置 0.5 英寸的悬挂缩进。 InchesToPoints 方法用来将英寸转化为磅值。
下面我们看我给出的代码：
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实践经验，全部浓缩在下面的各个教程及应用工具中：
