ProjectFile.CountItems

Returns the number of items in the project file.

Syntax:

CountItems() As Long

Return: Long

Example:
Dim ProjFile As ProjectFile Dim Items As Long Set ProjFile = Application.ActiveProjectFile Items = ProjFile.CountItems

See also:

Class ProjectFile

Syntax:	CountItems() As Long
Return:	Long
Example:	Dim ProjFile As ProjectFile Dim Items As Long Set ProjFile = Application.ActiveProjectFile Items = ProjFile.CountItems