通过

Word) (Words 对象

  • 项目

所选内容、 范围或文档中的单词集合。 Words 集合中的每一项都是一个 Range 对象，该对象表示一个单词。 没有 Word 的对象。

备注

使用 词 属性返回 文字 对象。 下面的代码示例显示当前选定的单词。

MsgBox Selection.Words.Count & " words are selected"

使用 的单词 （索引），其中索引是索引号，返回一个 Range 对象，该对象表示一个单词。 索引号代表单词的 单词 集合中的位置。 下面的代码示例设置为 24 磅倾斜所选内容中的第一个单词的格式。

With Selection.Words(1) 
 .Italic = True 
 .Font.Size = 24 
End With

Words 集合中的项包含字词后在单词和空格。 若要删除字词后的空格，请使用 Visual Basic 的 RTrim 函数，如 RTrim(ActiveDocument.Words(1))。 下面的代码示例将选择活动文档中第一个单词 （和其尾部空格）。

ActiveDocument.Words(1).Select

如果所选内容为插入点，且后面紧跟一个空格，则 Selection.Words(1) 指所选内容前面的单词。 如果所选的为插入点且后面紧跟一个字符，则 Selection.Words(1) 指所选内容后面的单词。

一个文档中，以上集合的 Count 属性返回正文部分的项目数。 要统计其他部分中的个数，请使用带有 Range 对象的集合。 此外， Count 属性在合计中包括标点符号和段落标记。 若要统计文档中的实际字数，请使用 字数统计对话框。 以下代码示例检索活动文档中的单词数并将该值赋给变量 numWords。

Set temp = Dialogs(wdDialogToolsWordCount) 
' Execute the dialog box to refresh its data. 
temp.Execute 
numWords = temp.Words

注意

[!注释] 有关调用内置对话框的详细信息，请参阅显示内置 Word 对话框。

不用于 Words 集合的 Add 方法。 请改用 新段落 方法或 活动 若要将文本添加到一个 Range 对象的方法。 下面的代码示例为活动文档中第一个单词后面插入文本。

ActiveDocument.Range.Words(1).InsertAfter "New text "

方法

名称
项

属性

名称
Application
Count
Creator
第一
最后一个
Parent

另请参阅

Word 对象模型参考

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。