MS Excel

Dobrý den,

rád bych požádal o pomoc se zadáváním a vyhledáním dat ve VBA. Na listu Home se mi spustí formulář, který umí vyhledat data dle pole "Sp.Zn." Vložte např. do pole Sp.Zn. hodnotu z Databaee sloupce D.

1) Úplně nahoře formuláře v oranžovém poli bych potřeboval nastavit výběr Úkonu podle listu ČÍSELNÍKY. Tj. Pokud se vybere "Žádost o povolení zk", tak aby se v políčku Úkon vybíralo jen z buněk C2:C16, pokud se vybere Typ Změna, pak bude Úkon k výběru z C17:C31 a pokud se byvere Typ Kontrola, pak se bude vybírat Úkon z C32:C37. Číselník lze jakkoli rozšířit / upravit.

2) každý zápis se uloží jako nový řádek. To je požadavek klienta. Když se vyhledává dle Sp.Zn., tak se vždy berou hodnoty z posledního řádku, obsahující Sp.Zn. To je správně. Formulář ale obsahuje list Kontroly, kde je Kontrola 1 - 3. Např. hodnota pole z listu Kontrola 1 - Datum oznámení se uloží do Database sloupce AV. Když by nastala Kontrola 2, v poli Úkon se vybere Oznámení o kontrole 2 a ve formuláři v listu Kontrola 2 se zapíše hodnota z pole datum oznámení do sloupce database - AV. To je správně.
Potřeboval bych ale nastavit vyhledání dle Sp.Zn. tak, aby se v listu Kontrola 1 vypsaly hodnoty z AV z řádku o kontrole 1 a do listu Kontrola 2 vypsala hodnota z AV z příslušného řádku o kontrole 2. Datové rozhraní databáze nelze upravit. není možné přidávat další sloupce.

Děkuji za případnou úvahu a pomoc.

Zaslat odpověď >

Strana: « předchozí 1 2 3 4 5 další »

MilaF(19.11.2020 15:23)#048950

Pokusil jsem se to co nejvíce zjednodušit, viz příloha.
Pokud bude vyplněn modrý řádek Kontrola - oznámení o kontrole 1, sloupec AV, pak potřebuji tuto hodnotu mít ve formuláři v poli "oznamenikontroly1".
Zároveň k tomu potřebuji dohledat do formulářového pole "oznamenikontroly2" hodnotu ze zeleného řádku Oznameni o kontrole 2, ze sloupce AV.
Děkuji za ochotu a snahu.

Příloha: zip

48950_kz2.zip (42kB, staženo 14x)

citovat

MilaF(19.11.2020 15:26)#048951

a zde je i náhled, kde se má co propsat.

Příloha: jpg

48951_vyhledani_dat.jpg (109kB, staženo 32x)

citovat

Jiří497(20.11.2020 7:53)#048955

Tak to vyzkoušejte.

Nevím, v jaké fázi máte program. Při načítání údajů k vybrane sp.zn. postupně načítáte a následně přepisujete hodnoty ve formuláři. Podle mě by stačilo zapsat jen ten poslední.

Příloha: zip

48955_kz2.v1.zip (49kB, staženo 15x)

citovat

MilaF(20.11.2020 14:10)#048956

Mockrát děkuji, vypadá to skvěle. Klobouk dolů.citovat

MilaF(23.11.2020 15:47)#048978

Dobrý den, chtěl Vás opět poprosit o pomoc, rozšíření vyhledávání.
U kontrol jsou možné varianty: "Oznámení o kontrole 1", "Protokol o kontrole 1" a "Uzavření kontroly 1".
Podobné úkony by byly u kontroly 2, viz list Číselníky.
S každým úkonem se vyplní příslušné políčko na příslušný řádek.
Zapisování dat zatím neřeším, nyní potřebuji vyhledat data tak, aby se načetlo pokud možno nejvíce dat ke konkrétní kontrole.
Př. načíst do formuláře co nejvíce modrých dat týkajících se kontroly 1 a zároveň načíst co nejvíce dat týkajících se kontroly 2
Jen doplním, že v databázi data nebudou rozdělena barevně.
Vyhledávání ve formuláři pracuje vyplněním pole "SpZn".
Děkuji za pomoc.

Příloha: zip

48978_kz3.zip (43kB, staženo 11x)

citovat

Jiří497(23.11.2020 21:27)#048979

No dobře, ale která kontrola se má načíst, když tam jsou všechny 3 (Oznámení, Protokol a Uzavření)?
Pokud tam bude jen jedna varianta. tak je to jasné.citovat

Jiří497(24.11.2020 0:08)#048980

Zatím to načítá data z Uzavření kontroly 1 a 2.
Asi by se mělo načítat Uzavření kontroly, když není tak Protokol, a když není Protokol tak Oznámení.
Nebo...?

Příloha: zip

48980_kz4.zip (52kB, staženo 12x)

citovat

Jiří497(24.11.2020 9:54)#048982

Tady je úprava:
Nejdříve kontroluje, jestli existuje "Uzavření kontroly". Pokud existuje vloží data do formuláře. Pokud neexistuje, kontroluje, zda je "Protokol o kontrole". Pokud je, do formuláře vloží data. Pokud neexistuje "Protokol" hledá "Oznámení o kontrole".
Toto dělá zvlášť pro kontrolu 1 a 2.
Barevné odlišení jsem chtěl jen pro sebe, abych pochopil, co vlastně chcete. Makro s barvičkama nepočítá.

Příloha: zip