MS Excel

Dobrý den,
potřebuji pomoci. Mám více stejných xlsm soborů, jen s různými názvy. Všechny soubory mají list s názvem "data", na kterém jsou vyplněny sloupce 1-110 a počet vyplněných řádků může být různý. První řádek je hlavička.

Potřebuji na "jeden" klik, načíst data z tohoto listu u všech souborů, tak, aby se soubory neotevíraly, a také, aby to fungovalo i v případě, že některý soubor je otevřen jiným uživatelem.

Cílové umístění by bylo na Listu "DATA_ALL" v souboru "SOUHRN.xlsm" , kde opět první řádek je hlavička a následně by se data načítala pod sebe. Ideálně pokud by v prvním sloupci bylo označení i soboru, ze kterého data pocházejí (tak jak to je např. u PowerQuery).

Pomohli byste mi s tím?
Moc děkuji.

Pozn.: PowerQuery jsem zkoušela, ale dost mi to házelo chyby při následném doplnění zdrojových sobourů, proto hledám cestu přes VBA.

Zaslat odpověď >

Lugr(14.8.2023 19:26)#055308

To by neměl být problém. Problémy jsou jiné. První, že jsi nám nedala přílohu, aby jsme se si to nemuseli cucat z prstu a druhý, že jsem na to měl čas celý víkendu a teď už je pozdě. Ale určitě to sem mrskni, buď ti pomůže někdo jiný a nebo já až na to budu mít čas.

citovat

elninoslov(14.8.2023 19:55)#055309

Čo myslíte tým, že PQ hádzalo chyby pri doplnení súborov? To predsa nemôže byť problém pre PQ, dáte iba Obnoviť Tabuľku. Ibaže by "zmena" znamenalo niečo iné ako pridanie dát do súborov, pridanie súborov s rovnakou štruktúrov a pod. Napr. zmena hlavičiek, názvu listu, počtu listov (aj iné názvy), nesúrodý počet stĺpcov, neexistujúce hodnoty, prázdne tabuľky a pod.

Pre makro to tiež nebude problém (bez otvárania). Stačí použiť, ako to ja nazývam, "dolovacie vzorce". Hromadná príprava a vloženie poľa vzorcov na bunky a prevod na hodnoty. Je potrebné vedieť, podľa ktorého stĺpca sa určuje počet riadkov, a či sú medzi dátami v tom stĺpci medzery a ich formát. Rozsah dát sa potom (bez otvorenia) vypočítava iným vzorcom.

Teda --> príloha.citovat

Hanesi(15.8.2023 18:17)#055310

Přikládám tedy přílohu "Příklad", ve které je několik listů.
Listy SM, JM, VČ a DATA_ALL.
Napadla mě to totiž dvě řešení:
1) Jelikož jsou jednotlivé excely uloženy ve více složkách, možná by bylo přehlednější mít i data z těchto složek samostatně a pak je seskupit dohromady do listu "DATA_ALL".
Pak by platilo následující: ...do listu SM se budou natahovat data ze ze složky např. C:\Formuláře\SM , která obsahuje jenom excely ...zde pro ilustraci excel SM1.xlsm a excel SM2.xlsm - data se budou ukládat pod sebe, první řádek je hlavička, makro se spustí při otevření souboru "Příklad".
Podobně pro list JM...do listu JM se budou natahovat data ze ze složky např. C:\Formuláře\JM , která obsahuje jenom excely ...zde pro ilustraci excel JM1.xlsm a excel JM2.xlsm - data se budou ukládat pod sebe, první řádek je hlavička, makro se spustí při otevření souboru "Příklad".
A stejně pak pro list VČ.

2) data by se rovnou ukládala ze všech složek do listu DATA_ALL pod sebe bez mezikroku samostatných listů.

Vždy bude vyplněný sloupec B, podle něj tedy lze počítat řádky. Formáty jednotlivých sloupců jsem vepsala do tabulky, snad to pomůže.
Formát tabulky ve zdrojových listech je totožný, listy se ve zdrojových souborech jmenují "data".

Příloha: zip

55310_priklad.zip (46kB, staženo 12x)

citovat

elninoslov(16.8.2023 6:57)#055311

Ja som si pre Vás nachystal zatiaľ 3 verzie.
- PQ so zavislosťou na stĺpcoch
- PQ nezavislé na stĺpcoch
- VBA zavislé na počte stĺpcov

VBA verziu nezávislú na počte a názvich stĺpcov som začal rozpracovácať.

VBA je rýchle, ale podľa mňa je pre Vás aj na pochopenie lepšie PQ. Keď prídem, pošlem, a uvidíte, že zložitosť PQ kódu je 20% oproti VBA. Aj keď to je zasa rýchlejšie.

No uvudíme.citovat

Hanesi(16.8.2023 8:19)#055312

moc děkuji :)citovat

elninoslov(17.8.2023 23:06)#055315

Tak včera som sa k tomu nedostal vôbec. Dnes som prispôsobil iba PQ. Prispôsobovať to moje makro sa mi dnes už asi nechce...

Příloha: zip

55315_formulare-pq.zip (164kB, staženo 6x)

citovat

Hanesi(22.8.2023 18:24)#055318

elninoslov napsal/a:

Tak včera som sa k tomu nedostal vôbec. Dnes som prispôsobil iba PQ. Prispôsobovať to moje makro sa mi dnes už asi nechce...Příloha: 55315_formulare-pq.zip (164kB, staženo 2x)

Moc děkuji :) Projdu si to.citovat

Téma: Data z více soborů ve více složkách pomocí VBA

Uživatelské menu

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Relativní cesta - zdroje Power Query

Vynásobit hodnoty kurzem - Power Query

Vynásobit hodnoty kurzem - Power Query

Relativní cesta - zdroje Power Query

Relativní cesta - zdroje Power Query

Relativní cesta - zdroje Power Query