Bonsoir, j'ai une combobox avec une date lorsque je selectionne j'ai la bonne date qui s'affiche exemple 10/02/2007 mais quand elle se recopie , cela donne
02/10/2007 comment forcer le faormat de date pour un combobox


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub userform_initialize()
Dim fl As Worksheet
 
 
 
Set fl = Worksheets("data")
fl.Activate
Dim LaDate As Date, i As Date
Dim j As Integer
    LaDate = Date - 30
    For i = LaDate To LaDate + 60
        cb_lst02.AddItem i
    Next
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub commandbutton1_click
Case "cb_lst02" 'Date
                lf.Cells(noligne, 2) = lecontrole.List(lecontrole.ListIndex)

merci a+