Classe Words - palavras (Word VBA)

Uma coleção de palavras em uma seleção, intervalo ou documento. Cada item na coleção Words é um objeto Range que representa uma palavra. Não há nenhum objeto do Word. Para usar uma variável de classe Words, ela primeiro precisa ser instanciada por exemplo

Dim wrds as Words
Set wrds = ActiveDocument.Words

Count

Retorna um Long que representa o número de palavras na coleção. Somente leitura.

If Selection.Words.Count >= 1 And _ 
 Selection.Type <> wdSelectionIP Then 
 MsgBox "The selection contains " & Selection.Words.Count _ 
 & " words." 
End If

First

Retorna um objeto Range que representa a primeira palavra em uma coleção de palavras.

Dim rngFirst As Range
Set rngFirst = ActiveDocument.Words.First

Item

Retorna um objeto Range individual em uma coleção.

Item (Index)

Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal do objeto individual.

Dim rngWord As Range
Set rngWord = ActiveDocument.Words(Index:=1)

Last

Retorna um objeto Range que representa a última palavra em uma coleção de palavras.

If Selection.Words.Count >= 2 Then 
 Selection.Words.Last.Bold = True 
End If