Description

Returns an object representing a collection of all entities in the model.

Syntax

Public Function Entities() As Entities

Example

Dim MyModel As Model
Dim AllEnts As Entities
Set MyDiagram = DiagramManager.ActiveDiagram
Set MyModel = MyDiagram.ActiveModel
AllEnts = MyModel.Entities

See Also

  • No labels