topic Display possible selection in QlikView

Display possible selection

Tue, 23 Nov 2010 12:42:04 GMT

Hello everybody,

I want to display in my macro a possible value of list selection, i know fonction like Getfielfselection(field), but is there a function to get a possible value (white color value)?

Best regards.

Display possible selection

Tue, 23 Nov 2010 13:04:12 GMT

Hu Attalah,

Try with something like following:


=concat(distinct YourField, ', ')

Regards.

Display possible selection

Tue, 23 Nov 2010 14:04:42 GMT

Thx Miguel your solution work.

Rgds.

Display possible selection

Tue, 23 Nov 2010 14:16:36 GMT

I want use cancat expression in a if, something like:

if( GetPossibleCount("Activity status")=1 and concat(distinct Myfield,', ')<>'Ok')

then ....

end if

Why The concat dont work in this case?

Display possible selection

Tue, 23 Nov 2010 15:51:40 GMT

Hi Attalah,

Certainly, I don't know what are you looking for, could you be more specific?

I've make the following example and it works:


=If(Concat(MyField,', ') = 'Ok', 1,2)

Regards.

Display possible selection

Tue, 23 Nov 2010 16:04:37 GMT

I want to use concat in a macro, is it possible?

Display possible selection

Tue, 23 Nov 2010 17:12:12 GMT

No, you can't but you could use a variable using the concat expression and read the result in the macro code.

Regards.

Display possible selection

johnw — Tue, 23 Nov 2010 20:56:56 GMT


Attalah Abdelhamid wrote:I want to use concat in a macro, is it possible?

You can use activedocument.evaluate() to get the value of normal QlikView expressions. So you should be able to use this in a VB macro:

activedocument.evaluate("concat(MyField,', ')")

Display possible selection

Wed, 24 Nov 2010 10:02:24 GMT

Hi john,

Finaly i have used a variable, and my code becomes:

set vok = ActiveDocument.Fields("Mill status").GetPossibleValues

if (vok.count=1 and vok.Item(0).Text="Ok") then

XLSheet.Range("A1").Value="All Mill status = Ok"

XLsheet.Cells.EntireColumn.AutoFit

XLsheet.Cells.EntireRow.AutoFit

else

table.CopyTableToClipboard true 'Copy data to Clipboard

XLSheet.Paste XLSheet.Range("A1")

XLsheet.Cells.EntireColumn.AutoFit

XLsheet.Cells.EntireRow.AutoFit

end if