Excel - ověření dat
Excel - ověření dat
Zdravím, potřeboval bych prosím poradit... mám více listu ale hlavní údaje chci brát jenom z jednoho což je seznam klientů. Chci aby jsem když kliknu na jméno tak se mi zobrazil seznam kde budu vidět 2-3 sloupce jako třeba Příjmení,Jméno,Telefon a když si ho vyberu tak aby se mi automaticky vyplnili tyto kolonky do nového zadávání. Přemýšlel jsem, že by se to asi dalo nějak udělat přes ověření dat ale nevím jak to uděla abych viděl více sloupců najednou... Děkuji za rady nebo ukázkový sešit.
-
- Level 4
- Příspěvky: 1142
- Registrován: srpen 08
- Pohlaví:
- Stav:
Offline
Re: Excel - ověření dat
Mozne reseni, princip:
Vyberem urcene bunky (bunek) udalostni procedura Worksheet_SelectionChange zobrazi pole se seznamem (z Ovladacich prvku, naplneno ze Seznamu, pozadovany pocet sloupcu,...), vyberem polozky je prenesena hodnota do volajici bunky. Podle hodnoty ve volajici bunce fukce SVYHLEDAT v urcenych bunkach vyhleda v Seznamu dalsi polozky.
Priklad, zakladni funkcionalita:
Seznam je na list3!A2:C6, hlavickovy radek list3!A1:C1
Ve vlastnostech pole se seznamem je v ListFillRange odkaz na seznam, BoundColumn=1, ColumnCount=3, ColumnWidths=70;50, ListWidth=200, Width=100, Visible=False,...
Udalostni procedura v modulu listu1:
vlozi do vlastnosti pole LinkedCell, aktivuje pole a zobrazi.
Vyberem v seznamu je prenesna do volajici bunky polozka z prvniho sloupce seznamu a procedura v modulu listu1 skryje seznam:
Doplneni dalsich polozek: v list1!B1 je vlozen a kopirovan dolu vzorec:
=KDYŽ(A1="";"";SVYHLEDAT(A1;List3!$A$2:$C$5;2;NEPRAVDA))
ktery muzes aplikovat na dalsi sloupce k doplneni polozek ze Seznamu.
Pozn.: Seznam muze byt definovan jako dynamicke pojmenovane pole viz http://www.officir.ic.cz/chipex04/03/ex ... avani.html
Vyberem urcene bunky (bunek) udalostni procedura Worksheet_SelectionChange zobrazi pole se seznamem (z Ovladacich prvku, naplneno ze Seznamu, pozadovany pocet sloupcu,...), vyberem polozky je prenesena hodnota do volajici bunky. Podle hodnoty ve volajici bunce fukce SVYHLEDAT v urcenych bunkach vyhleda v Seznamu dalsi polozky.
Priklad, zakladni funkcionalita:
Seznam je na list3!A2:C6, hlavickovy radek list3!A1:C1
Ve vlastnostech pole se seznamem je v ListFillRange odkaz na seznam, BoundColumn=1, ColumnCount=3, ColumnWidths=70;50, ListWidth=200, Width=100, Visible=False,...
Udalostni procedura v modulu listu1:
Kód: Vybrat vše
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 1 Then Exit Sub
With Me.ComboBox1
.Visible = True
.Activate
.LinkedCell = Target.Address
End With
End Sub
vlozi do vlastnosti pole LinkedCell, aktivuje pole a zobrazi.
Vyberem v seznamu je prenesna do volajici bunky polozka z prvniho sloupce seznamu a procedura v modulu listu1 skryje seznam:
Kód: Vybrat vše
Private Sub ComboBox1_Click()
Me.ComboBox1.Visible = False
End Sub
Doplneni dalsich polozek: v list1!B1 je vlozen a kopirovan dolu vzorec:
=KDYŽ(A1="";"";SVYHLEDAT(A1;List3!$A$2:$C$5;2;NEPRAVDA))
ktery muzes aplikovat na dalsi sloupce k doplneni polozek ze Seznamu.
Pozn.: Seznam muze byt definovan jako dynamicke pojmenovane pole viz http://www.officir.ic.cz/chipex04/03/ex ... avani.html
- Přílohy
-
- OvereniZobr3Sl.xls
- (28 KiB) Staženo 55 x
Re: Excel - ověření dat
Děkuji za radu jenom nechápu, proč se mi políčko ze seznamem schovává :) zobrazí se jenom když kliknu do sloupce kde chci zadávat. Dá se to udělat nějak abych si mohl vytvořit zadávací a prohlížecí formulář???
Děkuji moc za rady.... Krásný víkend
Děkuji moc za rady.... Krásný víkend
-
- Level 4
- Příspěvky: 1142
- Registrován: srpen 08
- Pohlaví:
- Stav:
Offline
Re: Excel - ověření dat
Dostal jsi radu co mozna nejlepe odpovidajici polozenemu obecnemu dotazu:
A nyni:
Na to je pouze odpoved: Da se udelat. A ty tri otazniky na konci nic v odpovedi nezmeni.
Pokud zadas konkretni reseni, musi dat dostatecne podrobny popis pozadavku nejlepe doplneny demo souborem s rucne vytvorenou predstavou reseni.
údaje chci brát jenom z jednoho což je seznam klientů. Chci aby jsem když kliknu na jméno tak se mi zobrazil seznam kde budu vidět 2-3 sloupce jako třeba Příjmení,Jméno,Telefon a když si ho vyberu tak aby se mi automaticky vyplnili tyto kolonky do nového zadávání
A nyni:
Dá se to udělat nějak abych si mohl vytvořit zadávací a prohlížecí formulář???
Na to je pouze odpoved: Da se udelat. A ty tri otazniky na konci nic v odpovedi nezmeni.
Pokud zadas konkretni reseni, musi dat dostatecne podrobny popis pozadavku nejlepe doplneny demo souborem s rucne vytvorenou predstavou reseni.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 1
- 732
-
od xCloudGirl
Zobrazit poslední příspěvek
05 bře 2024 15:33
-
-
Redmi 9C - zrušení ověření Google účtu
od Karrex » 16 kvě 2023 16:21 » v Mobily, tablety a jiná přenosná zařízení - 2
- 1840
-
od pcmaker
Zobrazit poslední příspěvek
16 kvě 2023 18:08
-
-
- 16
- 6570
-
od mirekol
Zobrazit poslední příspěvek
20 říj 2023 08:31
-
- 1
- 544
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
-
Excel komparacedvou soborů Příloha(y)
od teichmann.ondrej » 15 dub 2024 17:26 » v Kancelářské balíky - 11
- 3416
-
od teichmann.ondrej
Zobrazit poslední příspěvek
22 dub 2024 15:45
-
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 21 hostů