Discussion :

[apt]

Bonjour à tous,

Dans un UserForm, j'ai deux ComboBox qui me servent pour lister des dates.

Seulement voila, la date sélectionnée n'est pas affichée correctement, mais sous forme d'un numéro de série.

Par exemple, au lieu d'afficher 20/06/2012 elle affiche 40180.

Comment résoudre ce problème ?

Merci.

[jfontaine]

Bonjour,

Une solution consiste à manipuler l'affichage via l'évenement Change de la combobox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub ComboBox1_Change()
ComboBox1.Value = Format(ComboBox1.Text, "dd/mm/yyyy")
End Sub

[apt]

Bonsoir jfontaine,

Ça marche.

Merci.

[apt]

Bonjour,

Un autre problème :

Quand je voudrais afficher un élément de la ComboBox à l'initialisation d'un userform, j'aurais un chiffre au lieu d'une date :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub UserForm_Initialize()
    ComboBox1.ListIndex = 3
    ComboBox2.ListIndex = 3
End Sub