ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   filling a simple combobox (https://www.excelbanter.com/excel-programming/347295-filling-simple-combobox.html)

cliodne[_8_]

filling a simple combobox
 

I know this is an incredibly stupid question, but I've read my VBA book,
sites, and forum, and have not found the answer. All I'm trying to do
is create a simple dropdown box with five words that the user can
select from.

I tried this from what I've found, but it's not working:

Private Sub UserForm_Initialize()
'
'filling the combo box with values
'
With WeatherComboBox
..AddItem = "Sunny"
..AddItem = "Cloudy"
..AddItem = "Foggy"
..AddItem = "Rainy"
..AddItem = "Snowy"
End With
'
'selects the first list item
'
WeatherComboBox.ListIndex = 0
'
End Sub

---

thanks.


--
cliodne
------------------------------------------------------------------------
cliodne's Profile: http://www.excelforum.com/member.php...o&userid=28774
View this thread: http://www.excelforum.com/showthread...hreadid=490616


Jim Cone

filling a simple combobox
 
c,
Add a dot in front of all of the AddItems...
.AddItem
Jim Cone
San Francisco, USA
'------------------------------------


"cliodne" wrote in message ...
I know this is an incredibly stupid question, but I've read my VBA book,
sites, and forum, and have not found the answer. All I'm trying to do
is create a simple dropdown box with five words that the user can
select from.
I tried this from what I've found, but it's not working:

Private Sub UserForm_Initialize()'
'filling the combo box with values
'
With WeatherComboBox
AddItem = "Sunny"
AddItem = "Cloudy"
AddItem = "Foggy"
AddItem = "Rainy"
AddItem = "Snowy"
End With
'
'selects the first list item'
WeatherComboBox.ListIndex = 0
'
End Sub
thanks.
cliodne


cliodne[_9_]

filling a simple combobox
 

Hey Jim

In my code, I've already added the "."

The the problem because the code is in the UserForm_Initialize? I
tried putting it in the WeatherComboBox_Change, but that didnt' work
either.

Thanks,
Cami


--
cliodne
------------------------------------------------------------------------
cliodne's Profile: http://www.excelforum.com/member.php...o&userid=28774
View this thread: http://www.excelforum.com/showthread...hreadid=490616


Tom Ogilvy

filling a simple combobox
 
This worked fine for me (take out the Equal sign)

Private Sub UserForm_Initialize()

'
'filling the combo box with values
'
With WeatherCombobox
.AddItem "Sunny"
.AddItem "Cloudy"
.AddItem "Foggy"
.AddItem "Rainy"
.AddItem "Snowy"
End With
'
'selects the first list item
'
WeatherCombobox.ListIndex = 0
'
End Sub

--
Regards,
Tom Ogilvy


"cliodne" wrote in
message ...

Hey Jim

In my code, I've already added the "."

The the problem because the code is in the UserForm_Initialize? I
tried putting it in the WeatherComboBox_Change, but that didnt' work
either.

Thanks,
Cami


--
cliodne
------------------------------------------------------------------------
cliodne's Profile:

http://www.excelforum.com/member.php...o&userid=28774
View this thread: http://www.excelforum.com/showthread...hreadid=490616




Dave Peterson

filling a simple combobox
 
Get rid of the equal sign's

.additem "Sunny"

And make sure you don't have a .rowsource assigned to that combobox.

Option Explicit
Private Sub UserForm_Initialize()
'
'filling the combo box with values
'
With WeatherComboBox
.RowSource = ""
.AddItem "Sunny"
.AddItem "Cloudy"
.AddItem "Foggy"
.AddItem "Rainy"
.AddItem "Snowy"
End With
'
'selects the first list item
'
WeatherComboBox.ListIndex = 0
'

End Sub

cliodne wrote:

I know this is an incredibly stupid question, but I've read my VBA book,
sites, and forum, and have not found the answer. All I'm trying to do
is create a simple dropdown box with five words that the user can
select from.

I tried this from what I've found, but it's not working:

Private Sub UserForm_Initialize()
'
'filling the combo box with values
'
With WeatherComboBox
AddItem = "Sunny"
AddItem = "Cloudy"
AddItem = "Foggy"
AddItem = "Rainy"
AddItem = "Snowy"
End With
'
'selects the first list item
'
WeatherComboBox.ListIndex = 0
'
End Sub

---

thanks.

--
cliodne
------------------------------------------------------------------------
cliodne's Profile: http://www.excelforum.com/member.php...o&userid=28774
View this thread: http://www.excelforum.com/showthread...hreadid=490616


--

Dave Peterson

cliodne[_10_]

filling a simple combobox
 

Thank you everyone!

It's much appreicated,
Cami


--
cliodne
------------------------------------------------------------------------
cliodne's Profile: http://www.excelforum.com/member.php...o&userid=28774
View this thread: http://www.excelforum.com/showthread...hreadid=490616



All times are GMT +1. The time now is 04:01 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com