|
ED
|
avaliable
|
RT
|
not used
|
This method returns the number of the datatype.
Sub GetDataType() Dim zVarTypes As VarTypes 'Object from type VarTypes Dim zVarType As VarType 'Child object from type VarTypes 'Fill the objects Set zVarTypes = MyWorkspace.ActiveDocument.VarTypes 'Read the datatype INT from the list. Set zVarType = zVarTypes.Item("INT") 'Get the number of the datatype Debug.Print "Datatype = " & zVarType.GetDataType End Sub