Name ranges with a combo box

[JrClown]

How do I apply a Name Range to a combo box?? Thanks

"The reward of one duty done is the power to fulfill another"
J R C L W N
​

 

[JrClown]

[tt]Here's a better question:
How do I use this code:

=IF(A9="","",VLOOKUP(A9,myRange,2,FALSE))

with a combo box.

I already have a Name Range with cells where I have listed different topics with related fields as follows:

On a table I have:
Toyota
Camry
4Runner
Celica
etc

Nissan
Maxima
Sentra
etc

etc...


When my user type the car type in a specific cell the make of the vehicle appears next to it by using the Vlookup function.

Now I need to use the same function using the combo box and what I'm trying to do is:
When the users selects his\her name from the combo box their INITIALS will populate the combo box and NOT their name

Sorry to be a bit lengthy and Thanks in advance.

[/tt]

"The reward of one duty done is the power to fulfill another"
J R C L W N
​

 

[xlbo]

On_change event of combobox

Sub combo1_Change()
refTXT = Sheets("Sheet1&quot.DropDowns("combo1&quot.Value
refINIT = Application.VLookup(refTXT, Sheets("Sheet1&quot.Range("A1:c2&quot, 3, False)
Sheets("Sheet1&quot.DropDowns("combo1&quot.Text = refINIT
End Sub

This works with:
Forms combobox called combo1

table in A1:C2 with 1 Name Initials
2 Name Initials

etc etc
Also, the input range of the combobox should be B1:B2

Obviously your list will be longer but this works. If your combobox is from the controls toolbox, the syntax will be different

HTH
Geoff

 

[JrClown]

[tt]What am I doing wrong when I get this error:

Unable to get dropdown property of the worksheet class[/tt]

​

"The reward of one duty done is the power to fulfill another"
J R C L W N
​

 

[xlbo]

A: Which dropdown box are you using - Forms or Controls
B: Have you named the box "Combo1" ?
Geoff