Soubor se nepřipojil, tak ještě jednou.citovat
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: Název listu
MS Excel
Téma: Název listu 
Zaslal/a Stepanek100 26.5.2018 13:58
Někde na internetu nebo možná v této konferenci jsem našel perfektně provedené makro na převod souborů csv na xlsx.
Potřeboval bych ho malinko upravit a tak, aby převedený soubor xlsx zachoval název listu.
Příklad: csv má název listu "Data", po převodu se list jmenuje "List1".
Poradí mne někdo jak upravit makro, aby se zachoval název listu?
Děkuji
Aha.
Příloha: 
40474_prevodcsvnaxlsx.zip (17kB, staženo 27x)
citovat40474_prevodcsvnaxlsx.zip (17kB, staženo 27x)Děkuji.
Ale zapomněl jsem dodat, že každý sešit má jiný název listu.
Jak zachovat původní název listu.citovat
Ale zapomněl jsem dodat, že každý sešit má jiný název listu.
Jak zachovat původní název listu.citovat
CSV nieje zošit. Nemá žiaden list, a teda ani názov listu. Myslíte to asi tak, aby sa list Excelu, ktorý je vytvorený z CSV, volal tak ako sa volal súbor CSV (bez ".csv" na konci). V tom prípade skúste v procedúre C2X medzi tieto 2 riadky
With ActiveWorkbook
On Error Resume Next
vložiť toto
.ActiveSheet.Name = Left$(Replace(JmenoA, ".csv", ""), 32)citovat
With ActiveWorkbook
On Error Resume Next
vložiť toto
.ActiveSheet.Name = Left$(Replace(JmenoA, ".csv", ""), 32)citovat
Díky, perfektní, to je ono.
Jakýsi personální sw vychrlí xxx souborů *.csv podle pracovišť a já personalistce z toho dělám přehled v KT.
Ulehčíls mne hodně, hodně práce.
Ještě jednou díky.citovat
Jakýsi personální sw vychrlí xxx souborů *.csv podle pracovišť a já personalistce z toho dělám přehled v KT.
Ulehčíls mne hodně, hodně práce.
Ještě jednou díky.citovat
Otázka je, či to potrebujete mať ako samostatné súbory alebo zlúčené spolu, keď robíte potom z toho nejaké KT.
Ak je počet tých súborov naozaj väčší, napr. desiatky či stovky, tak by som použil metódu 2 alebo 3. Obe zbytočne nevytvárajú súbor xlsx pre každý CSV, ale upravia ten predošlý a uložia. Šetrí sa tým čas. A poradia si nielen s "*.csv" ale aj s "*.CSV". Zobrazuje sa v nich priebeh dole v StatusBare. Tá metóda 3, vytvorí druhú inštanciu Excelu, aby nedochádzalo k tomu blikaniu. Testoval som to na 32 súboroch CSV, rôznych veľkostí (700 B - 5,1 MB), a rozdiel v čase je značný.
No ak to má byť spolu, tam potom cez PowerQuery.
Je to iba návrh.
Ak je počet tých súborov naozaj väčší, napr. desiatky či stovky, tak by som použil metódu 2 alebo 3. Obe zbytočne nevytvárajú súbor xlsx pre každý CSV, ale upravia ten predošlý a uložia. Šetrí sa tým čas. A poradia si nielen s "*.csv" ale aj s "*.CSV". Zobrazuje sa v nich priebeh dole v StatusBare. Tá metóda 3, vytvorí druhú inštanciu Excelu, aby nedochádzalo k tomu blikaniu. Testoval som to na 32 súboroch CSV, rôznych veľkostí (700 B - 5,1 MB), a rozdiel v čase je značný.
No ak to má byť spolu, tam potom cez PowerQuery.
Je to iba návrh.
Příloha: 40485_prevodcsvnaxlsx.zip (31kB, staženo 30x)
citovat40485_prevodcsvnaxlsx.zip (31kB, staženo 30x)Díky, zítra v práci vyzkouším.citovat
PS: Ešte poznámka, ak sa nemajú prepisovať existujúce XLSX, tak výstup nastavte do inej zložky ako doteraz. Lebo urobil som obe metódy tak, aby sa nepýtali a rovno prepísali.citovat
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