Microsoft 365 Userform : Textbox prérempli et format heure

JulienLebreton · 27 Décembre 2020

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 · 27 Décembre 2020

Bonsoir JulienLebreton,

Pour les heures complétez la ListBox1_Click :

VB:

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 :

VB:

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

A+

job75 · 27 Décembre 2020

Bonsoir JulienLebreton,

Pour les heures complétez la ListBox1_Click :

VB:

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 :

VB:

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

A+

JulienLebreton · 27 Décembre 2020

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

Microsoft 365 Userform : Textbox prérempli et format heure

JulienLebreton

Guest

Pièces jointes

job75

job75

XLDnaute Barbatruc

JulienLebreton

Guest

Discussions similaires

Microsoft 365 Userform : Textbox prérempli et format heure

JulienLebreton

Guest

Pièces jointes

job75

XLDnaute Barbatruc

JulienLebreton

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency