format hh:mm en sortant textbox

bonjour
je n'arrive pas à trouver précisement ce que je recherche dans le forum, alors je me lance.
lors que je passe d'un textbox à un autre je voudrais qu'il me transforme une série de 4 chiffres en heures hh:mm
mais avec mon code j'ai toujours 00:00

Code:

---

1 2 3 4 5

Private Sub hfsopTextBox_Exit(ByVal Cancel As MSForms.ReturnBoolean)   hfsopTextBox = Format(hfsopTextBox, "hh:mm")   End Sub

---

Salut

il ne faut pas voir la fonction Format comme une fonction de mise en forme aussi simple :calim2:

Ici, je recommande plutot une approche comme celle ci:

Code:

---

1 2 3 4 5

Private Sub hfsopTextBox_Exit(ByVal Cancel As MSForms.ReturnBoolean) if Len(hfsopTextBox) = 4 Then hfsopTextBox = Left(cstr(hfsopTextBox),2) & ":" & Right(cstr(hfsopTextBox),2)) End if End Sub

---

et oui effectivement, ta réponse est claire,
Merci