Hello, is it possible modify code bellow to work with model states? Any ideas?
Dim oDoc As Document = ThisApplication.ActiveDocument
Dim OComp As ComponentDefinition = oDoc.ComponentDefinition
Dim oUPs As UserParameters = OComp.Parameters.UserParameters
Dim oUP As UserParameter
Dim xlsFile As String = "c:\_WORK_AV\Engineering\_Invdata\iLogic\Category.xls"
GoExcel.Open(xlsFile, "Sheet1")
Dim i As Integer = 2
Dim Param As String
Dim List As IList
Do Until i = 100
Param = GoExcel.CellValue ("A" & i)
If Param = "" Then Exit Do
List = GoExcel.CellValues("B" & i, "L" & i)
Try
Test = oUPs.Item(Param)
Catch
oUP = oUPs.AddByValue(Param, GoExcel.CellValue("B" & i), UnitsTypeEnum.kTextUnits)
End Try
MultiValue.List(Param) = List
i = i + 1
Loop
