GoExcel not recongnizing Sheet

[kylegT2ZZF]

I have some iLogic code where I'm trying to output a list to excel.  When I try and use the GoExcel command it gives me an error that it can't find Sheet1 in my table.  I have the excel table in the same location as my assembly so I'm not sure what's going wrong.  I've attached an example dataset to try out.

[A.Acheson]

Hi @kylegT2ZZF 

Couod you attach the code your using to this post? Press the </> button and paste the code from the ilogic editor. Once we see the code we can review if there is error in it's construction. Can you also paste any error messages your seeing? 

[kylegT2ZZF]

/

i = 20 ft
j = 2
While i < 70 ft
	Length = i
	Parameter("Lengths:1", "Length") = Length
	InventorVb.DocumentUpdate()
	Total_Length = Parameter("BC:1", "Length") + Parameter("TC1:1", "Length") + Parameter("TC2:1", "Length")
	a = "A" & j
	b = "B" & j
	i = i + 1
	j = j + 1
	GoExcel.CellValue("Lengths.xls", "Sheet1", a) = Length
	GoExcel.CellValue("Lengths.xls", "Sheet1", b) = Total_Length
End While

[kylegT2ZZF]

All the files in the attached zip also have all of my code and the excel file I'm trying to use.

[A.Acheson]

Can you check the file type your using is .xlsx. or matching the excel workbook your using? .xls is an older file type not commonly used today. 

Also I see the cells are not correctly referenced it should be "A1" etc

[kylegT2ZZF]

You got the file extension right, I'm using xlsx while the template from iLogic defaults to xls.  When I switched it started running but as you noted my cells are not referencing.  I'm wanting to indicate a range of cells and thought I could do that by indexing against a number that is increasing but that doesn't seem to work.  Any ideas how to get it to add the total length in order down the excel column?

[chaines59GWR]

You need to use the full path. Also I don't think calling out "a" will work.

I would do a loop like

For Each oItem as String in GoExcel.CellValues("filename.xls", "Sheet1", "A2", "A100")

    Logger.info(oItem)

Next

i = 20 ft
j = 2

Dim ExcelPath as String = "C:\Wherever\"

While i < 70 ft
	Length = i
	Parameter("Lengths:1", "Length") = Length
	InventorVb.DocumentUpdate()
	Total_Length = Parameter("BC:1", "Length") + Parameter("TC1:1", "Length") + Parameter("TC2:1", "Length")
	a = "A" & j
	b = "B" & j
	i = i + 1
	j = j + 1
	GoExcel.CellValue(ExcelPath & "Lengths.xls", "Sheet1", a) = Length
	GoExcel.CellValue(ExcelPath & "Lengths.xls", "Sheet1", b) = Total_Length
End While