< návrat zpět

MS Excel

Téma: Tlačítko -> input hodnoty -> Hodnota nalez rss

Zaslal/a KurmaN 27.8.2015 13:54

Zdravím Vás,

prosím o velikou radu.

Potřeboval bych vytvořit makro, konkrétně jde o toto:

Na prvním listě budu mít tlačítko, které když zmáčknu, vyskočí mi input box.
Do input boxu zadám hodnotu, která by měla být nalezena na následujícím listě. (Pakliže neobsahuje hodnotu, vypsat, že hodnota není k dispozici)
V případě, že je hodnota nalezena, tak k té hodnotě náleží další dvě informace, a to, hodnoty co jsou vedle v několika řádcích a pak informace k dané hodnotě z ještě dalšího listu.

Po nalezení těchto informací se seskupit dohromady a ideálně aby vyskočilo okénko s těmito informacemi, nebo klidně i fotka obsahující informace k hodnotě z jednoho i druhého listu. (Tyto hodnoty mohou být klidně na jednom listu, pokud by to mělo být jednodušší)

Jako přílohu přikládám ukázku hledaných hodnot a následně párování s dalšími informacemi.

Url na ukázky:

http://s16.postimg.org/6fk56krg5/Hodnoty.png

http://s11.postimg.org/n4lbb4pcj/Dalsi_hodnoty.png

Popis obrázků:
1. Obrázek ukazuje hodnoty. V prvním sloupci je hledaná hodnota a vedle toho jsou hodnoty, které potřebují být vytištěny

2. Obrázek Krohledat hodnoty v buňkách KEJE a Fabrics a pakliže tedy souhlasí tak vytisknout tabulku hodnot podtím.

Ano, je to asi hodně komplikované, ale byl bych velice vděčný za nějakou radu. Kdybyste měli jakoukoliv otázku, tak neváhejte a ptejte se.

Děkuji
S pozdravem
KurmaN

Zaslat odpověď >
KurmaN(27.8.2015 14:24)#026463
avatar
Noo.... Podíval jsem se na jeden Vámi reklamovaný odkaz a našel jsem tam něco takovéhoto, viz. příloha.

Možná za pomoci tohoto by to šlo také udělat, co říkáte?

KurmaN
Příloha: rar26463_3dvyhledavani.rar (19kB, staženo 19x)
citovat
elninoslov(28.8.2015 12:42)#026484
elninoslov
Spravil som Vám makro, ktoré vyhľadá a vypíše hľadané tabuľky na list Hledat. Odtiaľ si to už vytlačte.
Příloha: rar26484_tisk-vyhledanych-tabulek.rar (62kB, staženo 18x)
citovat
KurmaN(28.8.2015 13:27)#026485
avatar
Zdravím Vás,

toto je přesně to, co jsem potřeboval. Děkuji mockrát. Jen se chci zeptat.

Když je barva obsažena v obou listech => jsou tabulky vytisknuty. SUPER!!!

Když barva není obsažena v prvním listu => okýnko, že barva není nalezena. SUPER!!!

Teďka při testování se mi stal případ, že barva v prvním listě (stav) obsažena byla, ale v druhém (KEJEfabrics) již obsažena nebyla => vzešlo z toho to, že se mi seknul excel a musel jsem ho kompletně restartovat.
Šlo by toto nějak jednoduše ošetřit, že v případě, že je v prvním listě (stav) barva obsažena, tak tabulku vytisknout, to je správně, ale v případě, že v druhé není, tak se nic neděje a postačí jen ta z prvního listu?

Děkuji opravdu převelice
S pozdravem
KurmaNcitovat
elninoslov(28.8.2015 14:15)#026491
elninoslov
Žiaľ Vami popisovaný problém sa mi nedarí nasimulovať. U mňa (Excel 2013 x64) to funguje tak ako píšete, že by malo. Teda ak nenájde farbu na liste KEJEFabrics, nič sa nedeje, ostáva zobrazená aspoň tabuľka z listu Stav.

Otvorte si VBA (ľavý Alt+F11), tam si v Module1 nastavte kurzor niekde do procedúry Sub Hledat(), a stláčajte F8, týmto budete krokovať makro a jeho priebeh. Uvidíme, či kde Vám to havaruje. Dajte vedieť riadok na ktorom to kľaklo. Samozrejme pri krokovaní použite rovnaké hodnoty ako keď Vám to spadlo.citovat
KurmaN(28.8.2015 14:25)#026493
avatar
Tak jsem to právě vyzkoušel dle Vašeho postupu. Příjde mi jakoby se stále do nekonečna opakovalo: While poz < r následně proběhne až do řádku Koniec: a poté opět od začátku.citovat
elninoslov(28.8.2015 16:29)#026495
elninoslov
Do nekonečna to nieje. Najskôr sa prehľadá stĺpec A na slovo "KEJE:", ak ho nájde, skontroluje, či v bloku "KEJE:" je hľadaná farba, ak nie, hľadá ďalej, s posunutou hodnotou poz, ktorá označuje počiatok hľadania (inak by hľadal od začiatku). Na tom mojom súbore je KEJE 2x. čiže cyklus while prebehne 3x. Prvý krát najde prvú KEJE, druhý krát druhé KEJE, tretí cyklus až po koniec KEJE nenájde a skočí na KONIEC. Toto isté sa opakuje celé ešte raz ale s hodnotou "Fabrics:". Ak nájde v bloku KEJE alebo Fabrics zhodu farby, tak vyhľadá kde sa pod blokom nachádza "Hmax" a potom nájde prvú prázdnu bunku pod Hmax, takto zistí umiestnenie tabuľkového bloku dát. Ešte ho rozšíri o počet stĺpcov v riadku Hmax, ale o to nejde. To je stručný popis toho ako funguje tá druhá časť.

Ak chcete pošlite mi Váš konkrétny reálny súbor na mail (v profile).citovat
KurmaN(31.8.2015 7:30)#026527
avatar
Zdravím Vás,

právě jsem Vám poslal soubor na e-mail.

S pozdravem
KurmaNcitovat
elninoslov(1.9.2015 21:59)#026590
elninoslov
Len pre zaujímavosť a úplnosť dodám, že sme to poriešili cez mail, a keďže cudzie dáta sú pre mňa sväté, tak Vám tu uvádzam to riešenie skopírované do toho môjho súboru, čo som si vytvoril sám podľa obrázkov.
V reálnom súbore robilo problém zacyklenie, z dôvodu nevyplnenej oblasti Fabrics - ošetrené, a ďalej bolo potrebné zmeniť kopírovanie hodnôt z Copy Destination na Copy PasteSpecial, pretože tam boli vzorce.
Příloha: rar26590_tisk-vyhledanych-tabulek2.rar (62kB, staženo 17x)
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje