Lista desplegable en UserForm

[96andres96]

Buenas tardes,

en un UserForm tengo una lista desplegable (ComboBox) y, obviamente, para desplegarla tengo que clicar en la flecha que tiene a la derecha. Sin embargo, me gustaría saber si hay alguna forma de hacer que se despliegue clicando en cualquier lado de la lista, sin tener que darle justo a la flecha. ¿Es posible hacer esto?

Gracias.

[Antoni]

Añade este código, he supuesto que el combo se llama ComboBox1:

Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, _
                                ByVal X As Single, ByVal Y As Single)
ComboBox1.DropDown
End Sub

 

[96andres96]

hace 57 minutos , Antoni dijo:

Añade este código, he supuesto que el combo se llama ComboBox1:

Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, _
                                ByVal X As Single, ByVal Y As Single)
ComboBox1.DropDown
End Sub

 

Perfecto! Me ha servido.

Muchas gracias.