WordVBA - 处理 Selection 对象

WordVBA---处理 Selection 对象

在处理 Word 文档时，通常先要选择文本，然后再执行操作，例如设置文本的格式或键入文字。在 Visual Basic 中，它通常不需要在修改文本之前先行选择文本。取而代之的是， 需要创建一个引用文档的特定部分的Range对象。当需要对所选目标（Range对象）进行改变或响应的时候，可以使用Selection 对象。

如果尚未选中文本，使用Select方法来选择与特定对象关联的文本，并生成一个Selection 对象。

下面的指令在活动文档中选择的第一个单词。 Sub SelectFirstWord()

ActiveDocument.Words(1).Select End Sub

如果已经选定文本，可使用 Selection 属性返回一个 Selection 对象，该对象表示文档中当前选定的内容。每个文档只能有一个 Selection 对象，该对象始终访问当前选定内容。

下面的示例更改当前选定内容中段落的格式。

Sub FormatSelection()

Selection.Paragraphs.LeftIndent = InchesToPoints(0.5) End Sub

本示例在当前选定内容后插入单词\。 Sub InsertTextAfterSelection()

Selection.InsertAfter Text:=\ End Sub

1 / 2

本示例对选定文本应用加粗格式。 Sub BoldSelectedText() Selection.Font.Bold = True End Sub

宏录制器经常会创建使用 Selection 对象的宏。

下面的示例是使用宏录制器创建的。该宏选择活动文档中的前两个单词并对其应用加粗格式。

Sub Macro()

Selection.HomeKey Unit:=wdStory

Selection.MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend Selection.Font.Bold = wdToggle End Sub

下面的示例完成相同的任务，但不选择文本，也不使用 Selection 对象。 Sub WorkingWithRanges()

ActiveDocument.Range(Start:=0, _

End:=ActiveDocument.Words(2).End).Bold = True End Sub

2 / 2

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库WordVBA - 处理 Selection 对象在线全文阅读。