Pomoc s makrem Vyřešeno

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

cemmotar
nováček
Příspěvky: 7
Registrován: listopad 17
Pohlaví: Muž
Stav:
Offline

Pomoc s makrem  Vyřešeno

Příspěvekod cemmotar » 18 kvě 2018 14:24

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
Přílohy
Návrh.xlsx
(7.98 KiB) Staženo 13 x
KUS.XLS
(116 KiB) Staženo 16 x
gen.XLSX
(13.2 KiB) Staženo 16 x
DWG_seznam.xlsx
(83.07 KiB) Staženo 14 x

Reklama
Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 371
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Pomoc s makrem

Příspěvekod elninoslov » 20 kvě 2018 10:06

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 ?
...

Uživatelský avatar
Grimm
Level 2
Level 2
Příspěvky: 162
Registrován: září 17
Pohlaví: Muž
Stav:
Offline

Re: Pomoc s makrem

Příspěvekod Grimm » 20 kvě 2018 14:43

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. :lol:
Přílohy
PC-Help.zip
(129.23 KiB) Staženo 11 x

cemmotar
nováček
Příspěvky: 7
Registrován: listopad 17
Pohlaví: Muž
Stav:
Offline

Re: Pomoc s makrem

Příspěvekod cemmotar » 21 kvě 2018 10:07

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
Přílohy
Návrh.xlsx
(12.81 KiB) Staženo 14 x
KUS 4.XLS
(116 KiB) Staženo 11 x
KUS 3.XLS
(116 KiB) Staženo 12 x
KUS 2.XLS
(116.5 KiB) Staženo 10 x
KUS 1.XLS
(116 KiB) Staženo 12 x
gen.XLSX
(22.74 KiB) Staženo 10 x
DWG_seznam.xlsx
(83.07 KiB) Staženo 11 x

Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 371
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Pomoc s makrem

Příspěvekod elninoslov » 22 kvě 2018 17:35

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.
Přílohy
Kopírovanie dát medzi súbormi.zip
(224.59 KiB) Staženo 14 x

cemmotar
nováček
Příspěvky: 7
Registrován: listopad 17
Pohlaví: Muž
Stav:
Offline

Re: Pomoc s makrem

Příspěvekod cemmotar » 25 kvě 2018 12:44

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


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Pomoc se sestavením PC 45-50K
    od Kvp2 » 03 lis 2023 23:27 » v Rady s výběrem hw a sestavením PC
    22
    2665
    od Kvp2 Zobrazit poslední příspěvek
    12 lis 2023 20:39
  • Pomoc s výběrem SSD disku
    od eli125 » 25 dub 2023 12:37 » v Rady s výběrem hw a sestavením PC
    1
    1283
    od Zivan Zobrazit poslední příspěvek
    25 dub 2023 15:07
  • Pomoc pri upgrade procesoru
    od filipo88 » 16 led 2024 00:10 » v Rady s výběrem hw a sestavením PC
    3
    1035
    od filipo88 Zobrazit poslední příspěvek
    16 led 2024 17:59
  • Pomoc / Stavění PC do 20K / Nováček Příloha(y)
    od blatantq » 16 pro 2023 18:38 » v Rady s výběrem hw a sestavením PC
    32
    1473
    od Martab Zobrazit poslední příspěvek
    26 pro 2023 11:04
  • Kontrola+pomoc se sestavením NEW PC (do 70 tis.)
    od Petersfree » 15 pro 2023 21:10 » v Rady s výběrem hw a sestavením PC
    7
    1158
    od Petersfree Zobrazit poslední příspěvek
    22 pro 2023 06:55

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 3 hosti