Skip to main content
Announcements
Have questions about Qlik Connect? Join us live on April 10th, at 11 AM ET: SIGN UP NOW
cancel
Showing results for 
Search instead for 
Did you mean: 
Not applicable

import data from excel

Good time of day.

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

8 Replies
Not applicable
Author

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

Not applicable
Author

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

Not applicable
Author

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;

Not applicable
Author

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

Not applicable
Author

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

Not applicable
Author

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.

Not applicable
Author

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

Not applicable
Author

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

next

end sub