Fecha En Un Combobox

[Jom]

Amigos de Exceluciones, tengo el siguiente problemita: al realizar un comboBox esta referencia a una lista de meses, e vez de devolverme En05, me muestra 38353. Le adjunto el ejemplo.

Gracias

 

[cubaezb]

Coloca estas instrucciones en el código del formulario.

Private Sub ComboBox1_Change()
ComboBox1.Text = Format(ComboBox1.Text, "mmmm" & "-" & "yy")
End Sub

BYE

 

[Jom]

cubaezb, gracias por tu pronta sugerencia.

Muy agradecido

 

[Adrian]

Hola!
Perfecto lo de Cubaezb, pero con poner
Private Sub ComboBox1_Change()
ComboBox1.Text = Format(ComboBox1.Text, "mmmm-yy")
End Sub
hubiese bastado, es decir sin concatenaciones.

Atte.

 

[Jom]

Gracias Adrian, ya estaba comenzando a extrañar tus sugerencias.