update text box value on changing the combo box value

[barishta]

The attached user form works fine until i select the combo box values from drop down menu (by clicking) but it wouldn't be possible to keep on selecting combo box value from drop dowm menu (by clicking) as the original file has over 3500 enteries. So i prefer entering the combo box values manually and this is the point where i start facing problems :-(

e.g if i enter a5 (which doesn't persists in the range) in the combo box; it'll show "1" in the text box rather then showing nothing

Please Fix this up for me (if possible do something like if i would add anything like a5 [which doesn't persists in the range] it would pop out a message "not in list"




Please help me out guys.



Thanks in advance.

[royUK]

Use the listIndex property of the combobox

Private Sub ComboBox1_Change()
Dim Rw As Long
Rw = Me.ComboBox1.ListIndex + 2
On Error GoTo 1
TextBox1 = Cells(Rw, 2).Value
Label1 = ComboBox1
1 End Sub

Note: add 2 to allow for listindex starts at 0 plus header row

[barishta]

Now when i enter a5 in the combo box it shows tt (column b header) in the text box (i did change the code)

and doesn't that message box pop out thing possible ?

And

??Note: add 2 to allow for listindex starts at 0 plus header row ?? :-- sorry didn't get you

(i would be very great to you if you would make these changes to the attached sheet and upload it.)


Anyways thanks for you help