Microsoft 365 Userform : Textbox prérempli et format heure

[JulienLebreton]

Bonjour à tous et à toutes,

J'espère que vos fêtes de fin d'année se passent bien.
Je suis actuellement en train de modifier un fichier avec Userform. J'ai deux problème auxquels je suis confronté et peut être avez vous des solutions.

Premièrement, je souhaite visualiser certaines textbox sous format heure. Elles apparaissent actuellement au format scientifique, j'ai cherché des solutions mais sans succès jusqu'à présent.

Ma deuxième question porte toujours sur les textbox, je cherche à préremplir la textbox17 par "OK" dès que je clique dessus.

Merci à tous,

A bientôt,

Julien

 

[job75]

Bonsoir JulienLebreton,

Pour les heures complétez la ListBox1_Click :

Private Sub ListBox1_Click()
  For i = 1 To NbCol
    TMP = ListBox1.Column(i - 1)
    If Not IsError(TMP) Then Me("textbox" & i) = IIf(i = 12 Or i = 13, Format(TMP, "hh:mm:ss"), TMP)
  Next i
  Enreg = ListBox1.Column(NbCol)
End Sub

Pour TextBox17 :

Private Sub TextBox17_Enter()
TextBox17 = "OK"
End Sub

A+

 

[JulienLebreton]

Bonjour Job75,

C'est exactement ce que je cherchais à faire !
Merci infiniment, c'est vraiment sympa de pouvoir compter sur la communauté quand on bloque comme ça !

A bientôt,

Julien