MS Excel

Téma: Vyhledání hodnoty do txtbox podle jiného txtbox

Zaslal/a OB 13.1.2014 9:01

Dobrý den,

prosím o radu jak vyhledat číselnou hodnotu do
textboxu.

Příklad:
v UserForm,
data pro vyhledávání jsou List1,
Tabulka1
Sloupec1;Sloupec2
A 1
B 2
C 3

POSTUP:
1.textbox1 to kterého napíši A
2.CommandButton - vyhledání hodnoty do textbox2
3.textbox2 ve kterém se automaticky ukáže číslo 1

Díky moc pokud by někdo věděl.

Zaslat odpověď >

Palooo(13.1.2014 9:37)#017221

prilozte prilohu lebo takto mozem hadat ako vypada zdrojova tabulka z ktorej potrebujete hladat hodnotu

- mozte pouzit funkciu find
- mozte si najprv zdrojovu tabulku SETnut a potom sam prehladavat
- mozte to rucne hodit do array pola
- mozte vyuzit SELECT SQL syntax
atd.

tak preto prilohacitovat

OB(13.1.2014 11:36)#017226

Posílám přílohu. Formulář je vidět ve VBA.
Dík O.B.

Příloha: zip

17226_userform-vyhledani-hodnoty.zip (13kB, staženo 23x)

citovat

eLCHa(13.1.2014 12:03)#017227

Private Sub CommandButton1_Click()
With ActiveSheet.ListObjects("Tabulka1").Range
On Error Resume Next
TextBox2.Text = .Cells(Application.WorksheetFunction.Match(TextBox1.Text, .Columns(1), False), 2).Value
On Error GoTo 0
End With 'ActiveSheet.ListObjects("Tabulka1").Range
End Subcitovat

OB(13.1.2014 14:54)#017228

Dík všem už to funguje.!

citovat

Uživatelské menu

Nejste přihlášen(a)

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.