语法：expression.InsertParagraphAfter
expression 必需。该表达式返回一个 Range 或 Selection 对
象。
下例在当前段落之后插入一个新段落。 MyWord.Selection.InsertParagraphAfter （4）InsertParagraphBefore 方法
在指定的所选内容或区域前插入一个新段落。在应用本方法之后，该区域或所选内容将扩展至包括新段落。
语法：expression.InsertParagraphBefore
expression 必需。返回 Range 或 Selection 对象的表达式。
下例在活动文档开始处插入一个新段落。
MyWord.ActiveDocument.Range(0,0).InsertParagraphBefore （5）TypeParagraph 方法
插入一个新的空段落。如果所选内容没有折叠为一个插入点，则新段将覆盖所选内容。用 InsertParagraphAfter 或
InsertParagraphBefore 方法可插入一个新段而不删除所选内容。
语法：expression.TypeParagraph
expression 必需。该表达式返回一个 Selection 对象。
2、设置段落格式
设置段落格式的常用属性： （1）FirstLineIndent属性
返回或设置首行缩进或悬挂缩进的大小（以磅值表示）。用正数设置首行缩进的尺寸，用负数设置悬挂缩进的尺寸。数值型。
（2）LeftIndent属性
返回或设置一个值，该值代表指定段落、表格行或 HTML 分段的左缩进（以磅为单位）。数值型。
（3）RightIndent属性
返回或设置指定段落的右缩进量（以磅为单位）。数值型。 （4）Alignment属性
返回或设置一个指定段落的对齐方式。其值：0-左对齐 1-居中对齐 2-右对齐 3-两端对齐。
11
（5）LineSpacing属性
返回或设置指定段落的行距（以磅为单位）。数值型。 （6）HangingPunctuation属性
如果该属性值为.T.，则指定段落中的标点将可以溢出边界。 使用 Format 属性可返回一个或多个段落的 ParagraphFormat 对象。ParagraphFormat 属性返回所选内容、区域、样式、Find 对象或 Replacement 对象的 ParagraphFormat 对象。
下例将活动文档中的首段设置为右对齐。
MyWord.ActiveDocument.Paragraphs(1).Alignment =2
下例活动文档所有内容的有关范围设置段落格式：行距12磅，首行缩进20磅。
With MyWord.ActiveDocument.Content.ParagraphFormat
.LineSpacing=12 .FirstLineIndent=20 EndWith
四、Range 和 Selection 对象 （1）Range对象
该对象代表文档中的一个连续范围。每一个 Range 对象由一起始和一终止字符位置定义。和文档中书签的使用方法类似，使用 Range 对象识别文档的指定部分。但和书签不同，Range 对象只在定义该对象的过程正在运行时才存在。
Range 对象和所选内容相互独立。也就是说，可定义和复制一个范围而不需改变所选内容。还可在文档中定义多个范围，但每一个窗格中只能有一个所选内容。
可用 Range 方法返回一个 Range 对象，该对象由指定起始和终止字符位置定义。下例返回代表活动文档前 10 个字符的 Range 对象。
myRange = MyWord.ActiveDocument.Range(0, 10)
可用 Range 属性返回一个 Range 对象，该对象由其他对象的起点和终点定义。Range 对象可用于多种对象（例如，Paragraph、
12
Bookmark 和 Cell）。下例返回对应于活动文档第一段的 Range 对象。
aRange = MyWord.ActiveDocument.Paragraphs(1).Range 下例返回对应于活动文档第二至第四段的 Range 对象。 Range1= MyWord.ActiveDocument.Paragraphs(2).Range Range2= MyWord.ActiveDocument.Paragraphs(4).Range aRange = MyWord. ActiveDocument.Range(Range1.Start, Range2.End)
（2）Selection 对象
该对象代表窗口或窗格中的当前所选内容。所选内容代表文档中被选定（或突出显示的）的区域，若文档中没有所选内容，则代表插入点。每个文档窗格只能有一个活动的 Selection 对象，并且整个应用程序中只能有一个活动的 Selection 对象。
用 Selection 属性可返回 Selection 对象。如果没有使用 Selection 属性的对象识别符，Word 将返回活动文档窗口的活动窗格中的所选内容。下列示例从活动文档复制当前所选内容。
MyWord. Selection.Copy
下列示例剪切 Documents 集合中第三个文档的所选内容。访问文档的当前所选内容时，文档无需处于活动状态。
MyWord. Documents(3).ActiveWindow.Selection.Cut
用 Word 处理文档时，通常先选定文字，然后对所选内容进行操作，例如设置文字格式或键入文字。Select 方法可激活一个对象。例如，下列指令选定活动文档中的第一个单词。
MyWord. ActiveDocument.Words(1).Select （3）常用属性 ①Start属性
该属性返回或设置所选内容、区域或书签起始字符的位置。数值型。如果将本属性的值设置为大于 End 属性的值，则将 End 属性的值设为与 Start 属性的值相同。起始字符位置是指距文档该部分开头最近的字符位置。
13
本属性返回起始字符相对于文档该部分开头的位置。文字部分的起始字符位置为 0。通过设置本属性可以更改所选内容、区域或书签的大小。
下例返回活动文档第二段的起始字符位置和第四段的结束字符位置。这些字符位置用于创建区域 myRange。
Pos1 = MyWord. ActiveDocument.Paragraphs(2).Range.Start Pos2 = MyWord.ActiveDocument.Paragraphs(4).Range.End myRange = MyWord.ActiveDocument.Range(Pos1, Pos2) 下例通过起始和结束字符位置判断所选内容的长度。 SelLength = MyWord.Selection.End - MyWord.Selection.Start 下例将 myRange 起始字符的位置向右移动一个字符（使该区域缩小一个字符）。
myRange = MyWord.Selection.Range
myRange.SetRange (myRange.Start + 1, myRange.End) ②End属性
返回或设置所选内容、区域或书签中结束字符的位置。数值型。如果本属性设置的值小于 Start 属性的值，则 Start 属性将被设成同一值（即 Start 与 End 属性值相等）。
下例将 myRange 的结束位置移动一个字符。
myRange = MyWord.ActiveDocument.Paragraphs(1).Range myRange.End = myRange.End - 1 ③Text属性
返回或设置指定区域或所选内容中的文本。字符型。Text 属性返回选定部分或区域的无格式纯文本。设置该属性，可替换该区域或所选内容的文本。
示例用“Dear”替换活动文档的第一个词。 MyWord. ActiveDocument.Words(1).Text = \④Type属性
该属性返回Selection 对象选择的类型，返回值（只读）如下： 0－无Selection 对象 1－IP类型 2－普通文本 3－图文框 4－表格列 5－表格行
14
6－块状区域 7－线形 8－图形集合 下例将所选内容复制到新文档中。 If MyWord.Selection.Type = 2 MyWord.Selection.Copy
MyWord.Documents.Add.Content.Paste EndIf
⑤Information 属性
返回有关指定的所选内容或区域的信息。只读。 语法：expression.Information(Type)
expression 必需。该表达式返回一个Range 或Selection对象。 Type 数值型，必需。消息类型。以下是消息类型： 1－返回页码，在该页中包含指定的所选内容或区域的活动结尾。如果设置一个起始页码或进行其他手动调整，则返回经调整的页码（与 3 不同）。
2－返回节号，在该节中包含了指定的所选内容或区域的活动结尾。
3－返回页码，在该页中包含指定的所选内容或区域的活动结尾。从文档开头计数。忽略任何对页码的手动调整（与 1 不同）。
4－返回与所选内容或区域相关联的文档的页数。
5-返回指定的所选内容或区域的水平位置。该位置是所选内容或区域的左边缘与页面的左边缘之间的距离，以磅为单位（20 缇 = 1 磅）。如果所选内容或区域不可见，则该参数返回 - 1。
6－返回所选内容或区域的垂直位置，即所选内容的上边缘与页面的上边缘之间的距离，以磅为单位（20 缇 = 1 磅）。如果所选内容未显示在文档窗口中，则该参数返回 - 1。
7 返回指定的所选内容或区域相对于周围最近的正文边界左边缘的水平位置，以磅为单位（20 缇 = 1 磅，72 磅 = 1 英寸）。如果所选内容或区域未处于屏幕区域中，则该参数返回 - 1。
8－返回所选内容或区域相对于周围最近的正文边界的上边缘的垂直位置，以磅为单位（20 缇 = 1 磅，72 磅 = 1 英寸）。该参数
15