wachoo31
XLDnaute Occasionnel
Bonsoir a toute et tous
J'ai une combobox dans un USF mais je n'arrive pas a fixer l'affichage
Les valeurs sont prise dans une feuille sous le format JJ / MM / AAAA
Mais pas dans la combobox
Si joint le code que j'essaye
Private Sub Ini()
Dim L As Integer
Dim Plage As String
L = Sheets("Info").Range("A65536").End(xlUp).Row
Plage = Sheets("Info").Range("A3:A" & L).Address
ComboBox1.RowSource = "Info!" & Plage
ComboBox1.Value = Format(ComboBox1.Value, "dd / mm / yyyy")
End Sub
comment faire
J'ai une combobox dans un USF mais je n'arrive pas a fixer l'affichage
Les valeurs sont prise dans une feuille sous le format JJ / MM / AAAA
Mais pas dans la combobox
Si joint le code que j'essaye
Private Sub Ini()
Dim L As Integer
Dim Plage As String
L = Sheets("Info").Range("A65536").End(xlUp).Row
Plage = Sheets("Info").Range("A3:A" & L).Address
ComboBox1.RowSource = "Info!" & Plage
ComboBox1.Value = Format(ComboBox1.Value, "dd / mm / yyyy")
End Sub
comment faire