For ...next - Exiting after loop - don't know why

chris1987 — Thu, 28 Apr 2016 14:23:59 GMT

Afternoon,

I am trying to get used to creating macros in VBS in QV and I can't seem to figure out why the following is happening. I'm used to working with VBA but can't spot the issue here.

When I click the button to run the macro everything works fine up to the point of the loop. The loop initially works perfectly but then exits the sub, it never reaches the last message box for some reason.

Am I using the For ...next correctly?

Thanks in advance

Chris

Sub Test()

dim chart,ColumnCount,b,found

set chart = ActiveDocument.GetSheetObject("CH212")

found = false

ColumnCount = chart.getcolumncount

if ColumnCount = 1 then

msgbox "Count is Null"

exit sub

end if

msgbox ColumnCount

for b = 0 to ColumnCount

if chart.getfield(b).name = "entity" then

msgbox "Entity Already exists and is in position: " & b

found = true

else

msgbox "Skipped: Column" & b <------ I see this

end if

msgbox "Still going" <------ I also see this

msgbox "Finished Loop and Found flag = " & found <------ I never see this

end sub

Re: For ...next - Exiting after loop - don't know why

Gysbert_Wassenaar — Thu, 28 Apr 2016 17:15:10 GMT

Perhaps ColumnCount is 0 or undefined.

Re: For ...next - Exiting after loop - don't know why

marcus_sommer — Thu, 28 Apr 2016 17:47:10 GMT

Try it with:

...

for b = 0 to ColumnCount - 1

...

- Marcus

topic Re: For ...next - Exiting after loop - don't know why in QlikView

For ...next - Exiting after loop - don't know why

Re: For ...next - Exiting after loop - don't know why

Re: For ...next - Exiting after loop - don't know why