PC-HELP.CZ

Ahoj, prosím o pomoc s vytvořením makra. Jsem v tomto začátečník a nějak se mi to nedaří dát dohromady. Popis: v souboru "návrh" kliknu na tlačítko "zapiš" a provede se následující - v souboru s názvem v C4 se vezmou hodnody ze sloupců B a C a zapíší se do souboru "DWG_seznam". Do tohoto souboru se následně do sloupce E dopíše hodnota ze souboru "gen.XLSX" - dle pořadového čísla se dohledá číslo interní.
Přikládám v příloze vzorové soubory. Doufám, že jsem to popsal srozumitelně. Doted jsem to měl napsané z části funkcemi, ale v množství souborů které mě čekají bych to chtěl vyřešit makrem.

Díky za reakce

Venujem Vášmu problému oveľa viac času pri analýze, ako Vy sám, ale iba raz :

- Návrh a C4 ? Myslíte B4, lebo KUS je tam. V B4 bude výberový zoznam z možných súborov v nejakej zložke ? Aktualizovaný napr. pri aktivácii listu? Alebo máte vlastnú tabuľku s možnými hodnotami?
-V KUS treba skontrolovať, koľko je vyplnených riadkov v A15:A466 (Prečo 466? Prečo nie 500?), a iba tie vyplnené A a B skopírovať? Medzery medzi nimi byť nemôžu?
-Na vyhľadanie v súbore gen.XLSX sa dá použiť VLOOKUP/SVYHLEDAT ? Teda má súbor stále rovnakú štruktúru a veľkosť prehľadávaného rozsahu? To aby sa ten súbor nemusel tiež otvárať.
-O aké množstvo súborov sa jedná? A o ktorom druhe hovoríte, ktorých je veľa ? Tých, ktorých názvy sa zapisujú do B4? Tých, ktoré sú ako Návrh ? Alebo také ako DWG_Seznam?
-V zošite DWG_Seznam sa majú dáta prepisovať (staré zmazať), alebo pripisovať na prvý voľný riadok ? Číslovanie v A je pevne dané 1-24 ? Treba ho postupne dopĺňať, alebo prestať v prípade možného prekročenia ? Či vložiť odsek novej strany ?
...

Když už sem se s tím drbal, přikládám svůj pokus o řešení. Postupoval sem podle zadní tazatele, Neřešil sem rozpory co se týče buňky pro jméno souboru (C4 vs B4). Hodnoty v souboru "Kus" podle kterých se má hledat v souboru "Gen" nejsou obsaženy, v souboru "Gen" pracuji s druhým listem (protože poslední sloupec obsahuje "správné" záhlaví = číslo interní).
Všechny soubory musí být ve společné složce odkud se tahá cesta k souborům (ThisWorkbook.Path).
Snad se mi podařilo podchytit i případné chybové stavy, ale jelikož tazatel byl na informace skoupí nemusí to být stoprocentní.

Věřím, že elninoslov přijde s lepším (elegantnějším) řešením.
V tom případě to berte jako vzor jak se to nemá dělat.

Ahoj, oběma díky za reakci. Celý problém je více komlikované a tak jsem se to snažil zjednodušit a teď dle vaší reakce se dívám, že jsem to zjednodušil asi až moc. Od Grima to funguje skvěle, tak jak jsem v příspěvku popsal. Pokud jde o příspěvek od "elninoslov" - nenapadlo mě že se tím bude někdo zabývat až tak do hloubky. Takže to popíší více: v souboru Návrh měly být uvedeny původně cesty k souborům. Ted když nad tím přemýšlím tak úplně nejjednodušší by bylo, aby při zmáčknutí tlačítka Zapiš se objevilo zadávací okno, kde bych soubor KUS XXX našel - soubory s názvem KUS bude ve výsledku tisíce, ostatní soubory mají pevnou složku. U souborů KUS XXX jsem si uvědomil tvojí poznámku - ano, mezery můžou být (viz. KUS 2). Ohledně vyplněných řádků-466 je náhodné číslo, v každém KUS XXX souboru to může bít jiné - záleží na vyplněných řádcích. Dá se říci, že více než 500 řádků nikdy nebude vyplněno.
K soboru gen - sloupce se měnit nebudou, budou přibývat řádky a listy
V sešitě DWG_Seznam by se data měly zapisovat na další volný řádek. Pořadí se bude doplňovat. Mám soubor, který má 2735 řádků.
Doufám, že jsem to popsal lépe. Je to dost komplikované. Kdyžtak doplním, pokud bude potřeba. Děkuji

Kolegov príklad som ešte nevidel, no jeden dám aj ja. Vidieť, že ak sa človek snaží odchytať všetky možné stavy, ktoré by mohli v makre viesť k chybe, tak kód poriadne nabobtná, až je nakoniec neprehľadný. Pokúšal som sa urobiť to vkladaním predpripravených vzorcov a následný prevod na hodnoty, aby sa nemusel súbor otvárať, kvôli rýchlosti. Prišiel som ale na jednu situáciu, ktorá sa nedá ošetriť. Ak dáta v KUS súbore majú v Poradovom čísle ten identifikátor listu v gen.xlsx taký, aký list tam nieje, tak Excel vyhodí tabuľku, kde treba vybrať hociaký iný list, to je fuk, lebo aj tak nebude hodnota nájdená, a teda sa vloží prázdna bunka (jedine že by aj na liste "A1" začínali kódy napr. "A2", pričom iné "A2" kódy by boli na liste "A2", v tom prípade je to celé zle). Rovnako predpokladám identický zápis kódov, teda ľavé 2 písmenká identifikujú list. V KUS4 som zmenil jedno na A6 na skúšku.

DWG sa otvárať samozrejme musí, v prípade že nieje otvorený. To trvá najdlhšie, inak je rýchlosť OK.

Pridal som ešte featurku na vyhľadávanie, ak ich budú tisíce, tak rozbaľovacom zozname to bude o nervy.

Je tam výber umiestnenia, nejaké kontroly, správy užívateľovy, vytváranie zoznamu súborov, automatické dopĺňanie čísel, orámovanie cez PF a pod.

Skúste...

Ak je makro na Vás zložité, skúste kontaktovať užívateľa MePExG, je macher na PowerQuery, snáď by Vám vedel pomôcť dolovať tie dáta zo súborov pomocou PQ.

Moc děkuji, makro funguje skvěle. Ještě ho budu testovat na velkém balíku souborů. Uvidím jetli nenarazím na něco co bych měnil. Ještě jednou díky oběma