Select方法可用于多种对象,例如Bookmark、Field、Range 和Table对象。
A:下列示例选定活动文档中的第一个表格
Sub SelectTable()
ActiveDocument.Tables(1).Select
End Sub
B:下列示例选定活动文档中的第一个域
Sub SelectField()
ActiveDocument.Fields(1).Select
End Sub
C:下列示例选定活动文档中的前四个段落
Range方法用于创建一个引用前四个段落的 Range对象,然后将 Select方法应用于 Range对象。
Sub SelectRange()
Dim rngParagraphs As Range
Set rngParagraphs = ActiveDocument.Range( Start:=ActiveDocument.Paragraphs(1).Range.Start, End:=ActiveDocument.Paragraphs(4).Range.End)
rngParagraphs.Select
End Sub
D:下列命令选定活动文档中的第一个单词
Sub SelectFirstWord()
ActiveDocument.Words(1).Select
End Sub
新闻热点
疑难解答