HTMLProjectItems Property Example
This example returns the number of items in the HTMLProjectItems collection in the HTML project in the active workbook.
intCount = ActiveWorkbook.HTMLProject.HTMLProjectItems.Count