Sakra ještě ten soubor.
Příloha: 
50549_souhrn02.zip (21kB, staženo 17x)
citovat50549_souhrn02.zip (21kB, staženo 17x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Otevření sešitu z jiného aktivního sešitu
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
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
Strana: « předchozí 1
2
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.
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)
citovat50689_souhrn02_20210518.zip (53kB, staženo 13x)Upraveno
Příloha: 50699_souhrn02.zip (41kB, staženo 17x)
citovat50699_souhrn02.zip (41kB, staženo 17x)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.
Prosím o pomoc.
Děkuji.
Příloha: 50956_souhrn02_funguje.zip (377kB, staženo 16x)
citovat50956_souhrn02_funguje.zip (377kB, staženo 16x)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
Díky.citovat
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
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á.
...
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)
citovat51018_souhrn03.xlsx (232kB, staženo 17x)
Strana: « předchozí 1
2
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
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.
RSS nejnovější články