Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

format date et heure dans textbox d'un userform

5 réponses
Avatar
lolo
Bonjour

Dans un userform est il possible d'afficher dans avec une textbox la
date ainsi que l'heure =E0 =E0 laquelle a =E9t=E9 ouvert l'userform ?
Je vous remercie
Bonne soir=E9e

@ bient=F4t
Lolo

5 réponses

Avatar
LSteph
Bonjour,

Private Sub UserForm_Initialize()
TextBox1 = Format(Now, "dd/mm/yyyy-hh:nn:ss")
End Sub


'lSteph

lolo a écrit :
Bonjour

Dans un userform est il possible d'afficher dans avec une textbox la
date ainsi que l'heure à à laquelle a été ouvert l'userform ?
Je vous remercie
Bonne soirée

@ bientôt
Lolo


Avatar
isabelle
bonjour Lolo,

Private Sub UserForm_Initialize()
Me.TextBox1 = Format(Date, "yyyy-mm-dd mm:ss")
End Sub

isabelle

lolo a écrit :

Bonjour

Dans un userform est il possible d'afficher dans avec une textbox la
date ainsi que l'heure à à laquelle a été ouvert l'userform ?
Je vous remercie
Bonne soirée

@ bientôt
Lolo




Avatar
andre
bonjour isabelle
on peut aussi mettre un control statusbar1
qui donne l'heure (je ne me trompe pas)
par contre j'ai pas les secondes
et je ne le vois plus dans la BO controles suplementaires
andre

bonjour Lolo,

Private Sub UserForm_Initialize()
Me.TextBox1 = Format(Date, "yyyy-mm-dd mm:ss")
End Sub

isabelle

lolo a écrit :




--
andre
Avatar
isabelle
bonjour André,

je n'ai jamais eu ce control statusbar1 dans les controles suplementaires ,
pour moi, statusbar, as toujours été la barre de statut au bas de la
feuille,

isabelle

andre a écrit :

bonjour isabelle
on peut aussi mettre un control statusbar1
qui donne l'heure (je ne me trompe pas)
par contre j'ai pas les secondes
et je ne le vois plus dans la BO controles suplementaires
andre

bonjour Lolo,

Private Sub UserForm_Initialize()
Me.TextBox1 = Format(Date, "yyyy-mm-dd mm:ss")
End Sub

isabelle

lolo a écrit :






Avatar
lolo
Bonsoir

Merci beaucoup cela fonctionne parfaitement

Bonne soirée

Lolo