Description

Active Model of the Diagram. RETURN DATATYPE: Model.

Syntax

Public Function ActiveModel() As Variant

Example

Dim MyDiagram As Diagram 
Dim Mod As Model 
Set MyDiagram = DiagramManager.ActiveDiagram 
Mod = MyDiagram.ActiveModel

See Also



  • No labels