< návrat zpět
MS Excel
Téma: CommboBox + textové po
Zaslal/a Lubos 8.3.2011 9:30
Prosím o pomoc s částí makra - formuláře.
Pokud mám ComboBox s údaji ve sloupci A (např. 80), které načtu pomocí RowSource a teď potřebuji, aby se mi do TextBoxů forlumáře načetly údaje odpovídající řádku vybrané položky. Např. vyberu (v ComboBoxu) položku odpovídající buňce A35, jak dostanu do jednotlivých TextBoxů data z B35 do Textbox1, C35 do TextBox 2, ...
Předem díky L.
Poki(8.3.2011 9:48)#004294 Zdravim,
tady lze vyuzit vlastnost ListIndex, ktera rekne, ktera polozka ComboBoxu byla vybrana (poradi se ale cisluje od 0, tak se musi pricist jednicka, aby byl definovan radek).
Takto by mohl vypadat kod:
Private Sub ComboBox1_Change()
Dim Radek As Long
Radek = FORM.cbA.ListIndex + 1
txtB.Text = Cells(Radek, 2)
txtC.Text = Cells(Radek, 3)
txtD.Text = Cells(Radek, 4)
End Subcitovat