looping through Excel Range

[Candyman]

How do I bring back 6 values from an excel Range? I want to populate an array
and based on that array create multiple reports usingthe excel file.

I have:
Set xlsApp = CreateObject("Excel.Application")
With xlsApp.Application
.Workbooks.Open TemplateFile
.Visible = True
.for each c in range(Rng_LOB)

but it does not like a loop?

 

[Arvin Meyer [MVP]]

How do I bring back 6 values from an excel Range? I want to populate an
array
and based on that array create multiple reports usingthe excel file.

I have:
Set xlsApp = CreateObject("Excel.Application")
With xlsApp.Application
.Workbooks.Open TemplateFile
.Visible = True
.for each c in range(Rng_LOB)

but it does not like a loop?

It might like it more if you removed it from being an object of the Excel
Application.

For Each c in range(Rng_LOB)
'Do something
Next c

 

[Candyman]

Thanks! That dot me to the point of :
With xlsApp.Application
.Workbooks.Open TemplateFile
'.Visible = True
End With
For Each c In xlsApp.range(Rng_LOB)
myLOBs(i) = c.Value
i = i + 1
Next c

Now I can do my processing.