topic Re: import data from excel in QlikView

import data from excel

Wed, 27 Jun 2012 15:04:00 GMT

Good time of day.

There is a need to import a certain number of product codes of Excel macros and choose these values

Re: import data from excel

Wed, 27 Jun 2012 15:10:23 GMT

I would recommend you import all data and STORE it into a QVD.

After that load only the product codes that are important for you

Could you paste an example table in order to see what you need?

Regards

Re: import data from excel

Wed, 27 Jun 2012 15:14:57 GMT

The fact that the overload of applications takes a long time, and import data from Excel to several times a day

This is data from excel (product code)

Header 1
15252
12354
21555

Need:

by pressing a button working out the macro that would pick up the data and choose to Qlick View product code

Re: import data from excel

Wed, 27 Jun 2012 17:19:34 GMT

Did you try something like this?

Table:

LOAD Header 1,

Header 2,

Header 3

FROM

$(Path_QVD)SSTT.QVD

(qvd)

WHERE Header1 = 15252 or Header1 = 12354 or Header1 = 21555;

Re: import data from excel

Wed, 27 Jun 2012 17:24:46 GMT

No it is not what I need. It should be realized through macros, because the application is large and reload several times a day, I can not

Re: import data from excel

Wed, 27 Jun 2012 17:37:49 GMT

I do not need to load data from Excel into a table. I need to code 15252, 12354, 21555, of Excel, select the items in the table

Re: import data from excel

Wed, 27 Jun 2012 17:49:39 GMT

try.

For simple table (Graphic table)

=if(Header1=15252 or 12354 or 21555, Header1, Null())

After that supress null values

I don't have Qlik view here so I can't check the exact syntax.

Re: import data from excel

Thu, 28 Jun 2012 13:07:54 GMT

Product code may be different, and their quantity may be 1 or 99 999

Re: import data from excel

Wed, 04 Jul 2012 14:05:14 GMT

Here is what I got, can be useful to anyone

sub Product code

Set oXL=CreateObject("Excel.Application")

f_name = ActiveDocument.Variables("f_name").GetContent.String

Set oWB=oXL.Workbooks.Open(f_name,False)

oXL.Visible = True

Set x = oXL.Worksheets(1)

ActiveDocument.ClearAll true

for i=1 to 65536

b="A"&i&":A"&i

a=x.Range(b).Value

if a="" then exit for

ActiveDocument.Fields("Product code").ToggleSelect "" & a

end sub