Returns the number of items in the specified collection. Read-only Variant.
Some collections are 0-based and some are 1-based. The Count property for collections begins with one even though you access the first item in a collection with a zero.
The following example returns the number of themes and folders in the active web.
Private Sub GetWebCount()
Dim myWeb As WebEx
Dim myCount As Integer
Set myWeb = ActiveWeb
With myWeb
myThemeCount = .Themes.Count
myFolderCount = .RootFolder.Folders.Count
End With
End Sub