Selecionar texto caixa de combinação

Olá, estou aqui mais uma vez com outra dúvida

Quero saber como faço para ao clicar em uma caixa de combinação, seja selecionado o texto que estava nela.

Quando é uma caixa de texto eu consigo fazer isto pelo código:

Código:

Private Sub Empresa_Click()
    Me.Empresa.SelStart = 0
    Me.Empresa.SelLength = 255
End Sub

Mas quando tento fazer a mesma coisa com uma caixa de combinação não acondece nada, não funciona:

Código:

Private Sub Lista_Click()
    Lista.SetFocus
    Me.Lista.SelStart = 0
    Me.Lista.SelLength = 255
End Sub

Há alguma forma de fazer isto na caixa de combinação?

Olá

tente:


me.lista.value

ou :

me.lista.text

conseguiu?