topic Re: export qvd macros in QlikView

export qvd macros

souadouert — Mon, 27 Nov 2017 12:59:55 GMT

i have cross table and liste selection date, i need to create macros that turn over the liste select , and in each value , export this cross table as qvd file with one selection for this liste

it s possible?

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 13:10:42 GMT

This code from the API cycles through the possible values in a field:

set val=ActiveDocument.Fields("Month").GetPossibleValues

for i=0 to val.Count-1

msgbox(val.Item(i).Text) ' change this line to select each value

' Add code here to store to qvd

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 15:13:13 GMT

HELLO M W,

how to select the object tablecross ??

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 15:17:06 GMT

ActiveDocument.GetSheetObject( ref) , i knowed this funtion but how to store the table with the selection item

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 15:20:24 GMT

This is also from the API Guide:

set cs = ActiveDocument.GetSheetObject("CS03")

cs.ServerSideExportEx "C:\test.html" , ";" , 0 '0=HTML, 1=Text, 2=Bitmap, 3=XML, 4=QVD, 5=BIFF

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 15:25:33 GMT

set val=ActiveDocument.Fields("Date").GetPossibleValues

for i=0 to val.Count-1

set cs = ActiveDocument.GetSheetObject("ch10")

cs.ServerSideExportEx "nomfichier.qvd"

next
but with th store i need to store table with for each selection values possible , as if i selecte value of selection date and i stored the table , and after that the next value and i stored

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 15:40:47 GMT

I assume that means you will want a different name for each qvd?

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 15:45:52 GMT

I want to automate a task, I have a table, for the set of value of the selection date: I select a date and I export the table as qvd, I need to automate the task, export the table as many value of the selection, each time I select the date and I export

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 15:59:39 GMT

set val=ActiveDocument.Fields("AGENCE").GetPossibleValues

for i=0 to val.Count-1

ActiveDocument.Fields("AGENCE").Select (val.Item(i).Text)

set obj = ActiveDocument.GetSheetObject("CH02")

obj.ExportEx "C:\Users\04488\Desktop\Vision\straight(val.Item(i).Text).qvd",4

this script working but i need different name for each qvd

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 16:12:47 GMT

Doesn't val.Item(i).Text give you a different name?

Maybe:

obj.ExportEx "C:\Users\04488\Desktop\Vision\straight(" & val.Item(i).Text & ").qvd",4

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 16:24:05 GMT

m w can i use the function mid() in the module?

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 16:26:32 GMT

Yes

You want to do something like:

mid(val.Item(i).Text,4,10)

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 16:29:48 GMT

set val=ActiveDocument.Fields("date_s").GetPossibleValues

for i=0 to val.Count-1

ActiveDocument.Fields("date_s").Select (val.Item(i).Text)

set obj = ActiveDocument.GetSheetObject("CH173")

set String=(val.Item(i).Text)

TITRE=Instr(String,1,3)

obj.ExportEx "C:\Users\04488\Desktop\Vision\straight"& TITRE& ".qvd",4

i use this script biiut i have error Object required: '[string: "12/2015"]'

Re: export qvd macros

m_woolf — Mon, 27 Nov 2017 16:50:29 GMT

If you are trying to store val.Item(i).Text in a variable:

String=val.Item(i).Text

I don't know what you are trying to do with TITRE=Instr(String,1,3)

Re: export qvd macros

souadouert — Mon, 27 Nov 2017 17:47:07 GMT

i need a function like mid

the file name is mid(val.Item(i).Text,5,2)

for exemple: the selection 2017/10
i need to extract only10obj.ExportEx "C:\Users\04488\Desktop\Vision\straight"& TITRE& ".qvd",4

straight10.qvd