Až si někdo přestane vážit svého času, tak to rozluští a udělá.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: Zjednodušení a urychlení makra
Děkuji za odpověď.
Nevím, jestli Vám vadí můj popis problému nebo hromada volaných maker. Ve své podstatě je to jen jedno makro, ve kterém je posun na jiný sloupec.citovat
MS Excel
Téma: Zjednodušení a urychlení makra 
Zaslal/a a.mlady 24.11.2015 12:53
Přeji hezký den.
Chtěl bych se zeptat, zdali jde zjednodušit a tím i urychlit stávající makro, případně jestli toto makro se dá udělat nějak jinak.
Makro se spouští tlačítkem "Zadat data". Otevře se sešit s daným názvem a z něj se překopírují data do listu "Data". Sešit s daty se zavře. Poté z listu "Data" ze sloupce "C" se vyhledá "1" a do listu "Poruchy" se zapíše čas z téhož řádku. Pak se hledá poslední "1" v souvislé řadě a opět se zapíše čas z daného řádku. Tak to pokračuje až na konec dat.
Poté následuje kontrola až sloupce "M" po skončení tohoto sloupce, pokračuje kontrola postupně až do sloupce "BE".
V listu "Data" jsem ponechal vzorové data.
Více snad napoví přiložený soubor.
Předem děkuji za pomoc.
Příloha: 
28279_vypis-poruch_1.rar (256kB, staženo 17x)
28279_vypis-poruch_1.rar (256kB, staženo 17x)(24.11.2015 13:47)#028280
xlnc napsal/a:
Až si někdo přestane vážit svého času, tak to rozluští a udělá.
Děkuji za odpověď.
Nevím, jestli Vám vadí můj popis problému nebo hromada volaných maker. Ve své podstatě je to jen jedno makro, ve kterém je posun na jiný sloupec.citovat
(24.11.2015 16:03)#028282
Viděl jsem to asi na minutu, ale od boku hádám, že ta hromada maker by šla minimalizovat.citovat
(24.11.2015 16:14)#028283
Vnořené nejspíš zbytečné cykly For a Do, zbytečné Select, Activate..., nejspíš z 99 % podobné procedury, skoro určitě to jde optimalizovat. Bez striktního slovního zadání chování ale ne.citovat
(24.11.2015 16:56)#028285
Rozdělil bych to na dvě fáze:
1) načítání CSV - není jasné, jak to děláte (procházení složky, existence více souborů, Open nemusí být ideální, spíš bych doporučil efektivnější variantu přes MS Query a nebo ADO)
2) stávající harakiri, kdy jsem se ztratil u ověřování buňky výše (jinak jsem přesvědčený, že to půjde zkrátit/urychlit na zlomek stávajícího - filtr, pole, hromadné překlopení dat)
A mezi námi, on se najde někdo, kdo to třeba udělá, ale tohle už je drobátko za hranicí free pomoci. Dát dohromady jednoznačné zadání a řešení s vyzkoušením je už o hodině práce určitě.citovat
1) načítání CSV - není jasné, jak to děláte (procházení složky, existence více souborů, Open nemusí být ideální, spíš bych doporučil efektivnější variantu přes MS Query a nebo ADO)
2) stávající harakiri, kdy jsem se ztratil u ověřování buňky výše (jinak jsem přesvědčený, že to půjde zkrátit/urychlit na zlomek stávajícího - filtr, pole, hromadné překlopení dat)
A mezi námi, on se najde někdo, kdo to třeba udělá, ale tohle už je drobátko za hranicí free pomoci. Dát dohromady jednoznačné zadání a řešení s vyzkoušením je už o hodině práce určitě.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