< návrat zpět

MS Excel

Téma: zobraz MsgBox na zaklade splnenej podmienky rss

Zaslal/a soska 26.8.2015 19:40

Ahojte, potreboval by som poradit.
Chcel by som zobrazit MsgBox s textom "Cislo sa nachadza v zadanej oblasti". Na zobrazenie musi byt splnena podmienka:

1, na harku "H" zadam oblast ( rolovaci zoznam Vyber oblast)
2, na harku "H" zadam cislo (zadaj cislo)
3, ak sa toto cislo bude nachadzat vo vybranej oblasti na harku "H2", zobrazi sa textbox s pozadovanou spravou

Dakujem za pomoc
Prajem pekny vecer

Příloha: rar26441_test.rar (15kB, staženo 19x)
Zaslat odpověď >
Strana:  1 2   další »
elninoslov(26.8.2015 20:58)#026443
elninoslov
Určite na to potrebujete makro ? Tu máte vzorec, keď prídem urobím Vám aj to makro.

EDIT:
Makro, ak tomu nebudete rozumieť, rozsekám Vám to na drobné :
Sub Tlačidlo1_Kliknúť()
With Worksheets("H")
If Not IsError(Application.Match(.Cells(3, 3).Value, Worksheets("H2").Columns(WorksheetFunction.Match(.Cells(2, 3).Value, Worksheets("H2").Cells(1, 1).Resize(1, 6).Value, 0)), 0)) Then MsgBox ("Číslo sa nachádza v zadanej oblasti.")
End With
End Sub
Příloha: rar26443_obsahuje-neobsahuje.rar (16kB, staženo 20x)
citovat
soska(31.8.2015 19:09)#026569
avatar
Dakujem Vam, pouzil som vzorec nie makro, ale mohol by ste mi to rosekat ? Dakujemcitovat
elninoslov(31.8.2015 23:34)#026576
elninoslov
Ešte, že ste povedal... Mal som tam chybku, a to tú, že som pole oblasti rozšíril nie o 7, ale len o 6 stĺpcov. Jedno číslo, a už to na oblasť 4 nefungovalo :)
Rozsekať chcete makro ? Tu to máte, obe verzie, s tlačítkom sa spustí tá, ktorá nebude mať v názve na konci tú "2". Lepšie Vám to vysvetliť neviem, sú tam popisy, názvy premenných.
Ak chcete vysvetliť vzorec, no ten funguje rovnako a v rovnakom slede ako to makro, akurát na konci dá kratšiu slovnú hlášku. Ku vzorcu je pre zvýraznenie pridané podmienené formátovanie.
Příloha: rar26576_obsahuje-neobsahuje2.rar (19kB, staženo 19x)
citovat
soska(5.9.2015 15:40)#026687
avatar
Dakujem Vam za pomoc. Mam este jednu prozbu. Je to podobne ako predosla tabulka.

*Do policka cislo na harku "Hárok1" zadam cislo

*Makro alebo funkcia porovna toto cislo s cislami v tabulke na harku "Harok2"

* Ak najde zhodu vypise na harok1 do sltlpca Pismeno kazdeho stlpca v ktorom zhodu nasiel a kod tychto stlpcov.

Dakujem za pomoc
Příloha: rar26687_2.rar (14kB, staženo 19x)
citovat
elninoslov(5.9.2015 16:33)#026689
elninoslov
Ak tá tabuľka bude naozaj veľká, tak Vám prerobím výsledok do poľa, teraz je to pre zjednodušenie zápis výsledku po bunke. Ak to bude iba menší počet výsledkov (nie 100-vky), tak si to môžete nastaviť aj do Worksheet_Change udalosti pre tú B2.

Samozrejme ak by bol hrozil výsledok dlhší ako 41 riadkov, čo tam máte teraz, treba upraviť.
Příloha: rar26689_vyhladaj-kody.rar (19kB, staženo 19x)
citovat
soska(5.9.2015 20:01)#026692
avatar
Dakujem funguje, ma to ale hacik .. moze nastat situacia ked na harku2 bude mat
stlpec A: 131
B: 131
C: 122, 128, 131

Potom zapise na harok1 iba kod stlpca A, B. V realite bude mat tabulka na harku2 131 stlpcov a 40 riadkov.
Staci ak zmenim :
Union(.Cells(10, 1).Resize(41), .Cells(10, 3).Resize(41)).ClearContents

Na :
Union(.Cells(10, 1).Resize(131), .Cells(10, 3).Resize(131)).ClearContents

Dakujemcitovat
soska(5.9.2015 20:03)#026693
avatar
Pripinam prilohu kde je nasimulovana spominana situacia

Dakujem
Příloha: rar26693_vyhladaj-kody.rar (18kB, staženo 19x)
citovat
elninoslov(6.9.2015 0:42)#026697
elninoslov
Prekopaná verzia. Predošlá zisťovala počet riadkov tabuľky iba v stĺpci A, keďže tabuľka bola krásna, úhľadná, rovnomerná a vyplnená. Je potrebné druhý krát uviesť, že stĺpce sú nerovnomerné, lebo sa musí použiť iná metóda zisťovania počtu riadkov. Teraz je šumák, koľko tam budete mať stĺpcov a riadkov, a je jedno koľko je v ktorom stĺpci údajov.
Dodržte iba toto:
1. V liste s datami nemajte nič iné len data začínajúce od A1 (tak ako to máte, pridávajte len riadky alebo stĺpce).
2. V liste s výpisom nedávajte nič pod riadok 9 v stĺpcoch A a C.

Pridal som Vám tam aj Podmienené formátovanie pre vypísané kódy.

A posledná vec, nastavil som Vám to na skúšku tak, že nepotrebujete tlačítko, stačí iba napísať do B2 hľadanú hodnotu a okamžite vidíte výsledok. Ak chcete tlačítko zmažte si metódu Worksheet_Change listu "Hárok1", alebo opačne.
Příloha: rar26697_vyhladaj-kody.rar (24kB, staženo 19x)
citovat
soska(6.9.2015 11:10)#026700
avatar
Dobry den, dakujem za Vas cas. Skusil som tabulku ktoru ste upravil . Neviem ci popisujem problem dostatocne ale ak
Ak napr stlpec

A:131
B:131
C:122, 128, 131
D:131
E:131
F:131
G:131
H:131

Tak zapise kod iba z A,B,C stlpcov. A ostatne nezapise.
Pripnem prilohu zo situaciou.

Dakujem za pomoc
Příloha: rar26700_vyhladaj-kody.rar (24kB, staženo 19x)
citovat
elninoslov(6.9.2015 13:42)#026701
elninoslov
O pokročilej hodine som zabudol na "maličkosť", že bunka s posledným riadkom nemusí byť aj bunkou s posledným stĺpcom. Opravené.
Příloha: rar26701_vyhladaj-kody.rar (28kB, staženo 20x)
citovat

Strana:  1 2   další »

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