|
ED
|
avaliable
|
RT
|
not used
|
This method creates a limit at a variable.
Sub CreateEDLimit() Dim zVariables As Variables 'Object from type Variables Dim zVariable As Variable 'Child object from type Variables Dim zDrivers As Drivers 'Object from type Drivers Dim zVarTypes As VarTypes 'Object from type VarTypes 'Fill the objects Set zVariables = MyWorkspace.ActiveDocument.Variables Set zDrivers = MyWorkspace.ActiveDocument.Drivers Set zVarTypes = MyWorkspace.ActiveDocument.VarTypes 'Create a "intern driver" variable called "TestVariable" with object type "internal variable" and datatype "INT" Set zVariable = zVariables.CreateVar("TestVariable", zDrivers.Item(0), 33, zVarTypes.Item("INT")) 'Create a editor limit at the "TestVariable" zVariable.CreateEdLimit End Sub