Hi,
I'm struggling with a ComboBox.
i've managed to introduce several items by default. But he problem comes when I want to introduce a new one and display it as it's being typed.
So Ideally I'd like to show by default one of the Inputs introduced automatically. But also allow to introduce a new item.
I've used the event of the ComboBox KeyPress and it partially works.
I'd appreciate any hint of who had done similar stuff?
Regards
macro attached.
You have the wrong style for your control:
It should be:
Hi Jim, How do you do to convert it to CAPS??
Regards
I didn't. That is a side effect of using the KeyDown event for the combo box. It always returns uppercase values for letters. If you want to keep the case as typed by the user, you need to split things up. Keep the KeyDown handler to check for the ENTER key, but use a KeyPress event to get the text. The ENTER key doesn't cause a KeyPress event.
Hi Thanks for the help,
So, once introduced the text, to add it to the list, is it necesarry to press 'OK'?
My intention was that once ok is pressed, it continues with the macro, but it doesn't fill all properties.
Regards.
The ENTER key adds it to the list.
do you mean, Enter adds it by default, or because the code I wrote?
it doesn't add it by default, I've just checjked
Well I've just realized, that there's no point to add it to a list, this macro is just 1 use.
next time to be used, the variable will be reinitiated
In your code, this line checks to see if ENTER was pressed:
If KeyAscii = 13 Then
and then you add the new entry to the list with this line:
ComboBox1.AddItem NewList
To display adefault value for the compobox:
Private Sub UserForm_Initialize()
Me.ComboBox1.Value = "Please Select Material" ' This is the default
ComboBox1.AddItem "STAINLESS STEEL"
ComboBox1.AddItem "ALUMINIUM"
End Sub
...
To introduce a new input outside the list:
From the Properties area, change the ComboBox style to be ( 0- DropDownCombo) instead of 2- DropDownList
Apologize if any misunderstand.