• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Otevření sešitu z jiného aktivního sešitu

Zaslal/a OB 21.4.2021 13:54

Dobrý den,
prosím o pomoc s otevřením sešitu někde na disku a zkopírováním dat do otevřeného sešitu:

1. Mám soubory .xlsx uložené v adresáři DATA a soubory budou mít různé názvy (proměnné, ale vždy koncovka xlsx)
v každém souboru mám v buňce list1, buňka A1 hodnotu v textovém formátu např. "8Y0"

2. Mám otevřený soubor SOUHRN.xlsx a v listu1 a sloupci A:A , bude textový seznam souborů (který pomoci makra vygeneruji z adresáře DATA (např.data01 .. 02... 03, tzn. je to proměnná v názvu-textu souboru)

3. Zmáčknu tlačítko generovat data z adresáře DATA a makro, bude postupně otvírat jednotlivé soubory dle seznamu v aktivním sešitu, listu1, sloupce A:A a kopírovat z každého otevřeného souboru z listu1 hodnotu v buňce A1 do aktivního sešitu do listu2 do sloupce A:A

4. Po zkopírování textu ze souboru otevřeného dle seznamu v souboru SOUHRN.xlsx a v listu1 a sloupci A:A.
Se aktuálně otevřený soubor (např. data01) uzavře a pak makro pokračuje dalším otevřením souboru dle seznamu v souboru SOUHRN.xlsx a v listu1 a sloupci A:A.

Je to taková slovní úloha.

Poradil bych si s tímto v rámci jednoho aktivního sešitu z listu1 do listu2, ale tady se jedná o mnohem hlubší znalost práce s proměnnými.

Prosím tedy o pomoc.

Děkuji.
OB

Zaslat odpověď >

---

Strana:  « předchozí  1 2

Stalker(26.4.2021 12:13)#050549

Sakra ještě ten soubor.

Příloha: 50549_souhrn02.zip (21kB, staženo 17x)

citovat

OB(18.5.2021 8:05)#050689

Ahoj díval jsem se na kód, ale nemůžu přijít na to, jak přidat ještě jednu hodnotu ze zdrojových dat, aby se automaticky překopírovala do souboru Souhrn02. Jde o sloupec Datumstyp. Ten je ve zdrojových souborech (adresář DATA) ve sloupci H:H.
Prosím o přidání části kódu do souboru Souhrn02 do listu DataSouboru sloupec H:H.

Děkuji.O.B.

Příloha: 50689_souhrn02_20210518.zip (53kB, staženo 13x)

citovat

Stalker(18.5.2021 19:12)#050699

Upraveno

Příloha: 50699_souhrn02.zip (41kB, staženo 16x)

citovat

OB(19.5.2021 8:06)#050703

Ahoj vyzkouším. Díky za pomoc.citovat

OB(8.7.2021 10:01)#050956

Ahoj ještě se vracím k vynikající práci, kterou odvedl Stalker. Používám to a funguje skvěle. Ještě prosím o pomoc s tím, když se z jednotlivých souborů nahrávají data, co v jednotlivých souborech mají FORMÁT DATUM, tak aby i v tom souboru Souhrn02 ty stejné data měla FORMÁT DATUM, teď se v souboru Souhrn02 v listu DataSouboru tváří jako číslo s tečkami (obecný formát) a to nelze použít pro pozdější formátování datumu (v kont. tabulkách atd.).
Prosím o pomoc.

Děkuji.

Příloha: 50956_souhrn02_funguje.zip (377kB, staženo 16x)

citovat

OB(8.7.2021 10:11)#050957

Ještě prosím o jednu pomoc. Když se stáhnou všechny data ze všech souborů z adresáře DATA do souboru Souhrn02_funguje, ale v listu DataSouboru ve sloupci G jsou příliš "nafouklá" čísla a to vždy o "tři nuly" takže pak umazávám poslední 000, zřejmě je to chyba při převodu z jednotlivých souborů (hodnoty jsou čísla) z adresáře DATA.

Díky.citovat

Stalker(18.7.2021 14:30)#051016

OB napsal/a:

Ještě prosím o jednu pomoc. Když se stáhnou všechny data ze všech souborů z adresáře DATA do souboru Souhrn02_funguje, ale v listu DataSouboru ve sloupci G jsou příliš "nafouklá" čísla a to vždy o "tři nuly" takže pak umazávám poslední 000, zřejmě je to chyba při převodu z jednotlivých souborů (hodnoty jsou čísla) z adresáře DATA.

Díky.

Bohužel tady neporadím. Chyba nastává při programovém otevření souboru. Pokud soubor otevřu ručně (poklepáním na soubor), dostanu chybovou hlášku o neshodě formátu a přípony. Když potvrdím otevření soubor se otevře a obsahuje hodnoty např. 984, 981, 985 ...

Pokud se tentýž soubor (konkrétně např. 33683975) pouze otevře makrem! Hodnoty jsou uvedeny jako 984000, 981000, 985000 ...
Makro žádné převody hodnot neprovádí, vyjma použití funkce VAL k převodu čísel uložených jako text. Což není tento případ.

Nenapadá mě jiné řešení, než si opatřit jiné vstupní soubory.citovat

elninoslov(19.7.2021 12:55)#051018

Problém je evidentne ten, že to nie sú XLS súbory. To sú normálne textové súbory, len majú príponu XLS. No a v tom prípade sa Excel snaží automaticky určiť dátový typ. A ak sa pozriete kedy toto spotvorenie čísel nastane a kedy nie, tak si všimnete, že ak textočíslo obsahuje oddeľovač tisícov " " (medzera), tak to interpretuje správne podľa EU, ale ak tam medzera nieje, a je tam iba desatinná čiarka, tak ju podľa EN identifikuje ako oddeľovač tisícov, teda logicky pridá "000". Ako tak na to pozerám, asi by bolo lepšie použiť PQ. No jednoduché to nebude.

EDIT 19.7.2021 17:47
A aby som iba netliachal. Tu máte PQ súhrn, bez makra, iba dáte "Obnoviť všetko" na karte "Údaje". No funguje to iba na tie Vaše XLS (ktoré nimi niesú). Na normálne XLS/XLSX/XLSM to fungovať nebude. Tam by bolo treba v PQ vymyslieť ešte nejaký test či sa jedná o skutočný Excel súbor alebo tento Váš CSV premenovaný na XLS, a podľa toho zvoliť načítavaciu rutinu. Dátová štruktúra XLS a CSV je neporovnateľne iná.
...

Příloha: 51018_souhrn03.xlsx (232kB, staženo 17x)

citovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse