View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Brian Brian is offline
external usenet poster
 
Posts: 683
Default Auto Fill Text Box

I changed the city name to the following. When I go to the combo box and
choose my Address nothing happens. I missed something.

"Valrico"
"Atlanta"
"Tampa"
"Atlanta"
"Gastonia"


"B Lynn B" wrote:

Enclose each city name in double quotation marks. Otherwise VBA thinks
you're refering to a variable.

"Brian" wrote:

I am having trouble getting a text box to auto fill from a choice made from a
combo box.

Combo Box Name is Address_21
Text Box Name is City_1

My code is as follows:

'Auto Fill CES Spec Written Office

Private Sub ShowCity_1()
Dim Address_21 As Variant
Dim City_1 As Variant

If UserForm1.Address_21 = "2306 Long Green Court" Then UserForm1.City_1
= Valrico
If UserForm1.Address_21 = "3440 Oakcliff Road" Then UserForm1.City_1 =
Atlanta
If UserForm1.Address_21 = "7015 East 14th Aveneue" Then UserForm1.City_1
= Tampa
If UserForm1.Address_21 = "3890 Oakcliff Industrial Court" Then
UserForm1.City_1 = Atlanta
If UserForm1.Address_21 = "1800 Taylor Drive" Then UserForm1.City_1 =
Gastonia

End Sub

What did i do wrong or miss?