Extending product function with VBA : System Architect collections : SAObjects class : ReadAll
  
ReadAll
Reads all possible occurrences of the type into the collection.
Example
Dim coll As SAObjects, i As Integer
Set coll = sa.Encyclopedia.GetAllDiagrams
coll.ReadAll
For i = 1 To coll.Count
Debug.Print coll.Item(i).Name
Next i
See also
SAObjects class