OVH Cloud OVH Cloud

heures et combobox

4 réponses
Avatar
Jerome SABATHIE
Bonjour,
j'ai userform avec combox qui contient des heures (format hh:mm), quand je
choisi une heures il me les transforme.
par exemple 07:05 il me met 0.2951......
Je mets mon code de combobox ou j'ai mit format = hh:mm
et quand je reéssaye il me mets erreur de compilation, en jaune private sub
combobox1_change( )

Voici mon code:
Private Sub ComboBox1_Change()
Selection.NumberFormat = hh: mm
ActiveCell = ComboBox1.Value
ActiveCell.Select

End Sub

Merci d'avance

4 réponses

Avatar
JLuc
Selection.NumberFormat = hh: mm


Selection.NumberFormat = "hh:mm"

--
JLuc

Avatar
Jerome SABATHIE
Merci mais ça ne change rien faut il rajouter
value = "hh:mm"
merci
"JLuc" a écrit dans le message de news:

Selection.NumberFormat = hh: mm


Selection.NumberFormat = "hh:mm"

--
JLuc





Avatar
JLuc
Merci mais ça ne change rien faut il rajouter
value = "hh:mm"
merci
"JLuc" a écrit dans le message de news:

Selection.NumberFormat = hh: mm


Selection.NumberFormat = "hh:mm"

-- JLuc


Alors essaie plutot :



Private Sub ComboBox1_Change()
ActiveCell.NumberFormat = "hh:mm"
ActiveCell = Val(ComboBox1)
End Sub

--
JLuc



Avatar
Ange Ounis
J'essaierais :

ActiveCell.NumberFormat = "hh:mm"
ActiveCell = CDate(ComboBox1.Value)

----------
Ange Ounis
----------

Bonjour,
j'ai userform avec combox qui contient des heures (format hh:mm), quand je
choisi une heures il me les transforme.
par exemple 07:05 il me met 0.2951......
Je mets mon code de combobox ou j'ai mit format = hh:mm
et quand je reéssaye il me mets erreur de compilation, en jaune private sub
combobox1_change( )

Voici mon code:
Private Sub ComboBox1_Change()
Selection.NumberFormat = hh: mm
ActiveCell = ComboBox1.Value
ActiveCell.Select

End Sub

Merci d'avance