XL 2019 Format Heure COMBOBOX sur Feuille

[juju91]

Bonjour à tous,

J'ai créé un combBox dans une feuille avec une liste d'heure, jusque la tous va bien...
Quand je sélectionne la liste en heure son bien au bon format '00:00' par contre une fois la sélection faite le heure se "transforme" en nombre décimal.
Comment dois je faire pour garder le format 'hh:mm' ou éventuellement vider le comboBOX.
Pour information, le combobox alimente des cellules en format date avec le code ci dessous ( cela fonctionne bien)

Private Sub ComboBox2_Change()
Range("C3").Value = Format(CDate(ComboBox2.Value), "h:mm")
Range("D3").Value = ComboBox2.Value + Range("R3")

End Sub


auriez vous une solution a me proposer
Par avance merci

 

[fanch55]

Bonjour,

Private Sub ComboBox1_Change()
    ComboBox1 = Format(CDate(ComboBox1.Value), "hh:mm")
End Sub