Automatizar inserción datos con desplegables que se autorellenan

H o l a:

Te anexo el código para cargar los dato en los combos

Private Sub UserForm_Activate()
'Por.Dante Amor
    Set h3 = Sheets("CATALOGOS")
    For i = 2 To h3.Range("A" & Rows.Count).End(xlUp).Row
        ComboBox1.AddItem h3.Cells(i, "A")
    Next
    For i = 2 To h3.Range("B" & Rows.Count).End(xlUp).Row
        ComboBox2.AddItem h3.Cells(i, "B")
    Next
    For i = 2 To h3.Range("C" & Rows.Count).End(xlUp).Row
        ComboBox3.AddItem h3.Cells(i, "C")
    Next
End Sub

S a l u d o s

He probado el archivo con los combos y faltan cosas que todavía no hace:

Por un lado me gustaría que conforme escribo en el combo se me mostrara el desplegable con los valores del combo y se redujera el listado de valores mostrando solo los que coinciden con lo que escribo y así seleccionar uno.

Si por ejemplo no encuentra ningún valor coincidente en la listado del combo se guardará el valor escrito a mano y se autoañadirá en el listado del combo para ampliar así los valores del combo para la próxima vez que lo abra.

De esta manera si quiero escribir un valor a mano puedo y si no está se actualiza el combo con el nuevo valor y también puedo abrir el combo y seleccionar del desplegable un valor.

Ejemplo

Quiero añadir "xanadú" entro en el combo y voy escribiendo "xana.. Y como no está el valor en la lista del combo pues relleno a mano y este valor ya se guarda en el listado del combo para la próxima vez que abra el combo.

Muchas gracias por la ayuda

H o l a:

Claro que hace lo siguiente, si en idioma escribes la letra E, en automático te aparece el idioma Español.

Para esto es una pregunta nueva:

"Por un lado me gustaría que conforme escribo en el combo se me mostrara el desplegable con los valores del combo y se redujera el listado de valores mostrando solo los que coinciden con lo que escribo y así seleccionar uno."

Para esto, también es una pregunta nueva:

"Si por ejemplo no encuentra ningún valor coincidente en la listado del combo se guardará el valor escrito a mano y se autoañadirá en el listado del combo para ampliar así los valores del combo para la próxima vez que lo abra."

Cada petición debe ir en una pregunta nueva.

Para esta pregunta ya te estoy entregando 3 combos y su respectiva carga, reemplacé los textbox por combobox y creé los datos en una hoja, todo eso requiere de cierta lógica y estructura. Por eso te pido una pregunta por cada petición.

S a l u d o s