Range.Sentences (Word)

Retorna uma coleção Sentences que representa todas as frases no intervalo. Somente leitura.

Para obter mais informações sobre como retornar um único membro de uma coleção, consulte Retornando um único objeto de uma coleção.

MsgBox ActiveDocument.Paragraphs(1).Range _ 
 .Sentences.Count & " sentences"