Word) (Words 物件
選取範圍、 範圍或文件中的字數集合。 Words 集合中的每個項目是代表一個字的 Range 物件。 沒有 Word 的物件。
註解
使用 文字 屬性可傳回 Words 物件。 下列程式碼範例會顯示目前選取多少單字。
MsgBox Selection.Words.Count & " words are selected"
使用 字詞 (Index)，其中 Index 是索引編號，傳回代表一個字的 Range 物件。 索引編號代表 word 在 Words 集合的位置。 下列程式碼範例會將格式設定為 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 方法。 請改用 InsertAfter 方法或 InsertBefore 若要將文字新增至 Range 物件的方法。 下列程式碼範例會在使用中文件的第一個字後插入文字。
ActiveDocument.Range.Words(1).InsertAfter "New text "
方法
| 名稱 |
|---|
| 項目 |
屬性
| 名稱 |
|---|
| Application |
| 數目 |
| Creator |
| 第一個 |
| 最後一筆 |
| Parent |
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。