Problems with ComboBox in a VB form

[clasagu]

Hi,
I made a Form in VB with 3 ComboBox. The Problem is that when I show the option list and select any alternative. After that when I open again the Button for show the alternatives, the list is repeated at the end of the original. In others words, How can I limited that??.......I wish a only list option in the ComboBox and in this time is gowing any time that i select an option for the list

Thanks for your help, and regards!!!!

 

[Norie]

How exactly have you populated the comboboxes?

 

[clasagu]

View here.....the actual codes in a combobox

that it´s an example of the combobox codes right now......


Private Sub ComboBox1_Change()

'ComboBox1.Clear

ComboBox1.AddItem "PLASTICO"

ComboBox1.AddItem "MADERA"

ComboBox1.AddItem "METAL"

ComboBox1.AddItem "VIDRIO"

ComboBox1.AddItem "PAPEL"


End Sub


.....you can see something wrong????....sorry but I haven´t so much experience in Visual Basic.....thanks

 

[Norie]

Every time you make a selection in the combobox all those items will get added to it again.

If this is a userform then try using it's Initialize event.

Private Sub UserForm_Initialize()
'ComboBox1.Clear

ComboBox1.AddItem "PLASTICO"

ComboBox1.AddItem "MADERA"

ComboBox1.AddItem "METAL"

ComboBox1.AddItem "VIDRIO"

ComboBox1.AddItem "PAPEL" 
End Sub

Or uncomment this line.

'ComboBox1.Clear

 

[clasagu]

Re:norie

Thanks for your help but if I use Initialize Event the selection options in the Combobox is empty!!!!
And if I erase the fisrt line(Combobox1.Clear) I don´t have any posibility for write another options that be not in the pre-determinated list.......
If you have any extra comments, send me.........
Regards

 

[Norie]

How exactly have you tried to use the Initialize event?

 

[clasagu]

for Norie

I just copy the text sended for you.....

Private Sub UserForm_Initialize()
'ComboBox1.Clear

ComboBox1.AddItem "PLASTICO"

ComboBox1.AddItem "MADERA"

ComboBox1.AddItem "METAL"

ComboBox1.AddItem "VIDRIO"

ComboBox1.AddItem "PAPEL"
End Sub

In other words, I change the first line since
"Private Sub ComboBox1_Change()" to
"Private Sub ComboBox1_Initialize()".......

If your idea was different, explain me with details what need to do
One more time, thanks for your help.......

 

[Norie]

You should have copied the code exactly as I posted it.

And it should go in the userform's module.

A combobox doesn't have an Initialize event.

 

[clasagu]

Ok Norie, tanks for your help!!!
Finally I solved my problem with a office´s friend who help me this time......
Thanks for all and regards...