Combobox Form Help

[sebhughes]

I have a a worksheet a1 and down is names b1 and down is numbers

eg

sebastianhughes 1143

I have a form and the combo box and displays the names and below I ahve a textbox and I want it to show there number how cna I do this?

So if i pick sebastianhughes form the box the textbox in the form will show 1143?

 

[Norie]

How have you populated the combobox?

If you've used the RowSource property then you can probably use ListIndex to get the number.

Private Sub ComboBox1_Change()
    TextBox1.Value = Range("B" & ComboBox1.ListIndex + 1)
End Sub

 

[sebhughes]

Wow man works a treat :D

How would I be able to have it so I cna add a uservia the form.

So I would ahve 2 fields.

Name

Number

ANd when i entered this it would then add the name to the next avaible cell in a and number would go in the next avaliable cell in b

 

[sebhughes]

How can I have it so the combo box size. Is only as big as the number of people.

Say in a1

there were 2 names, Id want the combobox to only be 2 options big if you get me.

*edit* I think it the rowsource. So the row source will only ake the cells that have a value?

 

[sebhughes]

Also I ahve this code:

Private Sub ComboBox1_Change()
TextBox4.Text = Worksheets("Friends").Range("B" & ComboBox1.ListIndex + 2)


End Sub



Private Sub CommandButton1_Click()

person = TextBox4.Text

Message = TextBox2.Text

send = "net send " & person & " " & Message & ""

Shell (send)

End Sub

and it doesnt seem to be sending the message why is this?