VBA Excel Error

[karram]

Hello,

Please find attached screen shot while I run the I-logic in inventor also Excel will link with illogic.

[Anonymous]

Can you share your code please?

[karram]

Hello!

The code is very huge i think, its not able to share, because i create the ilogic rule in different parameter.

Mainly the excel only creates the error. Is there any reference missing or i use latest Windows 10 and Excel 2017.

Also i install two excel 2010 & 2017.

Could you please clarify?

[Anonymous]

I don't understand, are you using iLogic to read/write to excel or are you trying to run a VBA macro inside excel?

Can you at least share the section of code that creates the connection to excel?

[karram]

Iam using read / write excel to excel using ilogic

[karram]

'setting ExcelFile to be the one that exists in the workspace
ExcelFile =ThisDoc.WorkspacePath & "\" & "Nozzle_table.xls"

'finding the row number according to custom property: "Nozzle_ID"
GoExcel.FindRow(ExcelFile, "Nozzle_table","NOZZLE", "=", iProperties.Value("Custom", "Nozzle_ID"))

'getting the values for the nozzle list
iProperties.Value("Custom", "Nozzle_DESCR") = GoExcel.CurrentRowValue("DESCRIPTION")
iProperties.Value("Custom", "Nozzle_CODE") = GoExcel.CurrentRowValue("CODE")
iProperties.Value("Custom", "Nozzle_TYPE") = GoExcel.CurrentRowValue("NOZZLE TYPE")
iProperties.Value("Custom", "Nozzle_SIZE") = GoExcel.CurrentRowValue("LIST SIZE") 
iProperties.Value("Custom", "Nozzle_RATING") = GoExcel.CurrentRowValue("LIST RATING")
iProperties.Value("Custom", "Nozzle_COMMENT") = GoExcel.CurrentRowValue("COMMENT")

'getting the values for the nozzle dimensions and placing
Diameter_Excel=GoExcel.CurrentRowValue("SIZE (ACT.)")
Connection_thickness = GoExcel.CurrentRowValue("THICKNESS")
Dist_FR_XYplane_Excel = GoExcel.CurrentRowValue("DIST. FR. XY-PLANE")
Dist1_FR_Zaxis_Excel = GoExcel.CurrentRowValue("DIST1. FR. Z-AXIS")
Dist2_FR_Zaxis_Excel = GoExcel.CurrentRowValue("DIST2. FR. Z-AXIS")
Course_Excel = GoExcel.CurrentRowValue("COURSE") 
Direction_Excel=GoExcel.CurrentRowValue("DIRECTION")

iLogicVb.UpdateWhenDone = True

iLogicVb.RunRule("Nozzle balloon")

[Anonymous]

Have you debugged to identify which line is generating the error?

[karram]

if I run the whole rule this kind of error appears.

Also it not shows the exact line in this rule. This shows generally like this unhandled error

[MechMachineMan]

By inputting a message box and moving it down line by line and running code, you can manually debug to see the line of the error (see my signature for a link explaining this better)

Also, I think you issue COULD be the fact you are using a ".xls" instead of an ".xlsx".