topic Problem with macro - Select special value in QlikView

Problem with macro - Select special value

Fri, 09 Aug 2013 08:29:52 GMT

Hallo,

like title shows i have little problem with my macro...

The macro is used as a trigger event and should select the Dummy-Serial No if any other SERIAL_NO is selected.

So i write this macro:

Sub SelectDummy

set val = ActiveDocument.Fields("SERIAL_NO").GetSelectedValues

b = val.Count

check = 0

for i=0 to b-1

a=val.Item(i).Text

if a="Dummy" then check=1

if check=0 then ActiveDocument.Fields("SERIAL_NO").ToggleSelect("Dummy")

if check=1 and b=1 then ActiveDocument.Fields("SERIAL_NO").Clear

end sub

Which works, but now if i push the Clear-Button, while some SERIAL_NO are selected, all real SERIAL_NO are cleared, but the Dummy stays:(

At this moment there is no possibiltyy to get the field cleared. You can only select another SERIAL_NO and deselect it, then all is cleared...

How can i avoid this?

Thanks for any help,

Sarah

Re: Problem with macro - Select special value

marcus_sommer — Fri, 09 Aug 2013 10:34:50 GMT

I'm not sure I understood you right. I Think the macro seems not to cover all possibilities - try this:

Sub SelectDummy

set val = ActiveDocument.Fields("SERIAL_NO").GetSelectedValues

if val.Count = 1 and val.Item(i).Text = "Dummy" then

ActiveDocument.Fields("SERIAL_NO").Clear

else

for i=0 to val.Count - 1

if val.Item(i).Text = "Dummy" then

check = true

exit for

end if

if check <> true then ActiveDocument.Fields("SERIAL_NO").ToggleSelect("Dummy")

end if

end sub

- Marcus

Re: Problem with macro - Select special value

Fri, 09 Aug 2013 11:41:03 GMT

Thank u very much for the reply.

"I Think the macro seems not to cover all possibilities" - Yes i think u understand the problem.

But the macro cannot be executed like this...

It seems like the toggleSelect part works.(The Dummy-Serial is selected automaticaly too)

But if i want to clear by pushing the Clear-Button, the "Edit Module" Screen appears...

So i think the bold part does not work(I switch the "i" in first if-condition to "0",because "i" is initialized later. I think a little literal error,or?)

Sub SelectDummy

set val = ActiveDocument.Fields("SERIAL_NO").GetSelectedValues

if val.Count = 1 and val.Item(0).Text = "Dummy" then

ActiveDocument.Fields("SERIAL_NO").Clear

else

for i=0 to val.Count - 1

if val.Item(i).Text = "Dummy" then

check = true

exit for

end if

if check <> true then ActiveDocument.Fields("SERIAL_NO").ToggleSelect("Dummy")

end if

end sub

But i dont get the issue...

Re: Problem with macro - Select special value

marcus_sommer — Fri, 09 Aug 2013 11:59:22 GMT

It needs another condition before the error-line:

if val.Count = 0 then exit sub

- Marcus

Re: Problem with macro - Select special value

Fri, 09 Aug 2013 13:06:33 GMT

Yes now it works fine!

Thank u very much for help:)

Sarah