Description

Creates a new submodel with the given name, and then returns the new submodel to the caller. Only objects which are selected in the main model are added to the new submodel. PARAMETERS: Name (String).

Syntax

Public Function Add( _
   ByVal Name As Variant _
) As SubModel

Parameters

  • Name

Example

Dim MyModel As Model
Dim NewSubModelName As String

NewSubModelName = "Sales"

MyModel.SubModels.Add(NewSubModelName)