Extending product function with VBA : The System Architect object model : Object model classes : MetaItem class : TypeName
  
TypeName
The name of the type of object.
Parameters
Data type: String
Read-only
Example
Dim sa As SA2001.Application
Set sa = New SA2001.Application
With sa.Encyclopedia.MetaModel.MetaClasses.Item(1).SupportedMetaItems.Item(1)
Debug.Print .TypeNameEnd With
See also
MetaItem class: Attributes