MS Excel

Ano svět se v prdel obrací, díky lidem jako vy. Pokud na můj dotaz nelze odpovědět proč je tady tolik příspěvků? Stačilo by napsat že bez příkladu nelze a hotovo. Stačil by jeden. Místo toho tady dokola X lidí plýtvá časem a já se ptám proč? Fajn, možná dotaz nebyl položen správně, možná se ptám blbě, možná je můj kód mizernej...proč na to proboha ale reagujete když vám to podle všeho za to nestojí? Já si nějak odpovědi nárokuju? Vy víte co já čekám za odpovědi? Píšu někde že chci zadarmo řešení všech problémů světa? Ne. Nejste povinní sem cokoli psát a tak to nerobte.

Nechápu že se tolik lidí nechá vytočit "špatně" položeným dotazem na fóru... citovat

Já s vámi souhlasím, nicméně trocha pokory by neškodila ani zdejším "mistrum".
Dal jsem si tedy s tím práci a testovací soubory přikládám.

Já obecně nemám problém s kritikou, ale když si pořádně přečtete první post, tak já se prostě jenom ptám na radu, abych zjistil jestli je někdo schopen mi pomoci, jestli má někdo podobnou zkušenost. Nevím jací "Mistři" sem chodí ani jak ochotní jsou poradit, zkrátka jsem se zeptal a proč nedávám příklad hned jsem taky napsal. Já nikoho nenutím aby mi pomáhal, ale na několika fórech taky působím (ne ohledně programování) a s takovým přístupem jako tady jsem se snad ještě nesetkal. Takhle zadupat nováčka do země jenom proto že nepoložil dotaz tak jak se místním líbí, promiňte mi, ale i kdyby měli zmínění pánové titul mistra světa v excelu tak pro mě jsou to neandrtálci neschopní porozumět psanému textu, popřípadě internetoví trollové...ať si to dotyční přeberou.
Nikdo učený z nebe nespadl a zatím se tu neobjevila jediná smysluplná odpoveď nebo jakákoli rada ať už se přímo týká problému nebo ne.citovat

Jediné čo mi tam na prvý pohľad bije do očí ohľadom pamäti je práve to spomínané neuvoľňovanie 4 objektov v rekurzii. A ohľadom rýchlosti mi nesedí nepredstaviteľné množstvo volaní listov a buniek. Ja by som to prerobil na polia. To by malo pri takomto množstve volaní podstatne pomôcť v rýchlosti. Neviem či to zvládnte, alebo či to bude možné (tak dopodrobna som to zas neskúmal). A farbu by som nastavil cez PF asi.A možno aj ExecuteExcel4Macro by sa dalo nahradiť tak, že by sa do listu Data vložil vzorec na všetky testované súbory, a tie čo nemajú daný list by hodili chybu. No a tie chyby potom vybrať pomocou SpecialCells a zmazať riadky.
Ale ako vravím, príliš som to neskúmal.citovat

@elninoslov

Vložení vzorce na neexistující list vyvolá dialog na vyhledávání souborů, řekl bych.

Asi bych to zkusil jimak
1 Ověření existence listu pomocí ado
2 vložení hodnoty

Ale nejsem u pccitovat

Áno, žiaľ. Ak je v zošite jediný list, tak je šumák, aký názov sa napíše, automaticky vloží správny odkaz na správny (jediný) list. No ak ich je viac, nespapá to. citovat