Returns the number of words in the project file.
Syntax:
CountWords() As Long
Dim ProjFile As ProjectFile Dim Words As Long Set ProjFile = Application.ActiveProjectFile Words = ProjFile.CountWords
See also: