iLogic Lesson #2 - Create Parameters Using Excel Spreadsheet

For a complete iLogic course, beginner to intermediate, visit: https://design-automation.teachable.com/ More content on Instagram: https://www.instagram.com/designautomationsolutions/ Contact: [email protected] LinkedIn: https://www.linkedin.com/in/5428086/ iLogic Tutorials: https://www.youtube.com/playlist?list=PLQVQ8nYBZdlNF1Quc6_kMo0vM1Mxr_XPJ iLogic For Beginners Playlist: https://www.youtube.com/playlist?list=PLQVQ8nYBZdlOUl1opOmoihuRdBkXwfCjW iLogic Automation Examples: https://www.youtube.com/playlist?list=PLQVQ8nYBZdlPid5lM-ocZ5xw0X1ItSXjJ This YouTube Channel and Design Automation Solutions LLC. is not affiliated with Autodesk or Autodesk Inventor. Dim oDoc As Document = ThisApplication.ActiveDocument Dim oComp As PartComponentDefinition = oDoc.ComponentDefinition Dim oUPs As UserParameters = oComp.Parameters.UserParameters Dim oUP As UserParameter Dim xlsFile As String = "C:\CLEV\PROJECTS\FELIX\Book1.xlsx" 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, "F" & i) Try Test = oUPs.Item(ParamName).Value Catch oUP = oUPs.AddByExpression(Param, GoExcel.CellValue("B" & i), UnitsTypeEnum.kInchLengthUnits) End Try MultiValue.List(Param) = List i = i + 1 Loop