Microsoft Word 对象

Microsoft Word 对象(14)
Selection. GoTo What :=wdGoToLine, Which :=wdGoToAbsolute, Count :=4

以下的示例将选定内容恰好移动到活动文档中的下一个域之前。

Selection. GoToNext What :=wdGoToField

在Selection对象使用的对象

可以在Range对象和Document对象中使用的许多其他对象也能在Selection对象中使用，这使得用户可以在一个选定内容中控制操纵对象。要获得能在Selection对象使用的对象的完整列表，请参阅“帮助”中的“Microsoft Word 对象(Selection)”，或者“Selection对象”。

以下的示例更新了选定内容中各个域的结果。

If Selection. Fields. Count >= 1 Then Selection. Fields. Update

以下的示例将一节中的各个段落缩进了0.5英寸。

Selection. Paragraphs. LeftIndent = InchesToPoints (0.5)

用户可以使用For Each...Next语句在选定内容中的单个对象上进行循环操作，来代替对选定内容中的所有对象逐个进行控制操纵。以下的示例在选定内容的每个段落上进行循环操作，将找到的任何居中的段落变为左对齐。

For Each para In Selection. Paragraphs

If para. Alignment = wdAlignParagraphCenter Then para. Alignment = _

wdAlignParagraphLeft

Next para

以下的示例显示出选定内容中每个书签的名字。

For Each aBook In Selection. Bookmarks

MsgBox aBook. Name

Next aBook

Selection对象的属性和方法

本节突出介绍Selection对象的一些常用属性和方法。

返回或设置选定内容中的文字

可以使用Text属性来返回或设置一个Selection对象的内容。以下的示例返回所选的文字。

strText = Selection. Text

以下的示例将所选文字改为“Hello World”。

Selection. Text = "Hello World"

可以InsertBefore 方法或InsertBefore方法，在选定内容之前或之后插入文字。以下的示例在选定内容之前插入了文字。

Selection. InsertBefore Text :="And furthermore "

为许多文字设定格式

可以使用Font属性来访问设置字符格式的属性和方法，也可以使用ParagraphFormat属性来访问设置段落格式的属性和方法。以下的示例设置了选定内容的字符和段落格式。

With Selection. Font

.Name = "Times New Roman"

.Size = 14

End With

Selection. ParagraphFormat. LeftIndent = InchesToPoints (0.5)

返回一个Range对象

如果一种方法或属性是在Range对象而不是Selection对象中使用的(例如，CheckSpelling方法)，那么可以使用Range属性来从Selection对象返回一个Range对象。以下的示例对所选单词进行拼写检查。

Selection. Range. CheckSpelling

返回关于选定内容的信息

可以使用Information属性来返回关于选定内容的信息。例如，用户可以判断当前页的页码、文档的总页数，或是判断选定内容是否在一个页眉或注脚中。Information属性可取三十五种不同的常量(wdActiveEndPageNumber, wdNumberOfPagesInDocument 和 wdInHeaderFooter等等)，用户可以使用它们来返回关于选定内容的不同信息。举个例子，如果选定内容处于一张表格中，那么以下的示例将显示表格中的行号或列号。