Read Only

Count As Long

Returns the number of query categories in the project.

The following example that traverses the query categories collection prints the name and item number of each category, represented by Queries.Count, and sets up the For loop using QueryCategories.Count.

Dim prj As Project

Dim i As Integer

For i = 0 To prj.QueryCategories.Count - 1

debug.Print prj.QueryCategories(i).Name 

debug.Print prj.QueryCategories.Count 

Next i