https://blog.crossjoin.co.uk/2015/06/10/power-queryexcel-2016-vba-examples/citovat
Zaslal/a Jeza.m 5.12.2016 14:23
Ahoj, vím že možností jak načíst data z externího souboru je spousta, ale momentálně to zkouším pomocí Power Query a nějak nevím jak bych pomocí VBA mohl změnit cestu k souboru, když bych chtěl jiný.
Neměl by někdo nějaký tip?
V editoru pro Power Query vidím jakýsi M code:
let
Zdroj = Excel.Workbook(File.Contents("C:\Pokus.xlsm"), null, true),
SEZNAM_Table = Zdroj{[Item="SEZNAM",Kind="Table"]}[Data],
#"Změněný typ" = Table.TransformColumnTypes(SEZNAM_Table,{{"CC", Int64.Type}, {"AUTOR", type text}, {"PRODUKT", type text}, {"KOD", Int64.Type}, {"TEXT", type text}, {"BARCODE", type text}})
in
#"Změněný typ"
Otázkou je jak pomocí VBA změnit např. C:\Pokus.xlsm na D:\Pokus.xlsm
Když nepůjde vyřeším jinak, když půjde budu rád :-)
Díky za jakýkoliv tip
M@
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.