Stránka 1 z 1

Poštovní podací arch

Napsal: 18 čer 2012 20:19
od esi32
Zdravím a rád bych opět a znovu požádal o radu a pomoc.
Stáhl jsem formulář na poštu-poštovní podací arch.Rád bych ho plnil adresami pomocí UserFormu.Ten formulář má deset položek k vyplnění.V Userformu mam deset Comboboxů.Každý Combobox pro jeden řádek.V Comboboxech budou jména,v Textboxech ulice,město a PSČ.Umím naplnit daty jeden ComboBox,ale ty další neumím.Poradí někdo?
Dík za případnou pomoc.

Re: Poštovní podací arch

Napsal: 19 čer 2012 15:00
od d1amond
Ná základě vybrané položky comboboxu vyhledáš údaj na listu 2 a hodnoty z buněk naplníš do textboxu. Co je nejasné?

Re: Poštovní podací arch

Napsal: 26 čer 2012 16:00
od esi32
Zdravím a omlouvám se za zpožděnou reakci.Zdravotní problémy mě odstavily na nějaký čas od PC..
Nejasné je to,že se mi podaří načíst pouze hodnoty do Cx1 a k němu přidané adresy.Neumím udělat to,aby další Comboboxy dělaly to co dělá ComBobox1.Pokud si naplním daty např.Cx2,tak do dalších hodnot(Adresy psč a ulice)se mi načtou stejné hodnoty,které byly předtím vybrané pro Cx1.Takže mam sice rozdílná jména a příjmení,ale stejné adresy.

Re: Poštovní podací arch

Napsal: 26 čer 2012 18:21
od d1amond
Pošli demo data, nechce se mi to dělat od začátku.

Re: Poštovní podací arch

Napsal: 26 čer 2012 18:51
od esi32
Dík za pomoc.Pošlu zitra po návratu z nemocnice.Je tu neskutečně pomalý internet a svůj telefon nemam s sebou.Ještě jednou dík.

Re: Poštovní podací arch

Napsal: 27 čer 2012 15:22
od d1amond
Postovni_podaci_arch.xlsm
(39.49 KiB) Staženo 100 x


Takže.
Procedura USERFORM_ACTIVATE()
Při aktivaci UserForm1 se naplní ComboBoxy hodnotama ze sloupce 1 na listu Klienti + se do druhého sloupce ComboBoxu přidá jméno (co kdyby byli dva Petrové Nováci, na základě jména a příjmení je nerozliším).
Procedura COMBOBOX1_CHANGE()
Na základě výběru adresáta se pustí fce fnHledejAdresata s parametrem strUNI, který se vezme z vybrané položky ComboBoxu. Fce vrací hodnotu Range, která odpovídá nalezené buňce UNI na listu Klienti. Pak už se jen plní TextBoxy.

Fce je v Module1, vše ostatní je na UserForm1. Upravil jsem to pouze pro první ComboBox1, analogicky bude zbytek. Stačí jen pozměnit čísla TextBoxů.