OVH Cloud OVH Cloud

Format horaire d'un Label1

2 réponses
Avatar
Tatane
Bonjour,

J'ai "pioché" des lignes de code dans l'aide VBA et essayé d'adapter pour
changer le format d'un "label" dans un "UserForm".

Dim MyTime, MyDate, MyStr
MyStr = Format(Données.Saisie_Début, "hh:mm")

J'ai essyé de mettre le code dans le "UserForm - Initialize" mais il ne se
passe rien. Le format de mon "Label" reste "00:00:00" à l'affichage de mon
"UserForm".

Si vous pouvez me renseigner, merci d'avance.

2 réponses

Avatar
JB
Bonjour,

x = #12:30:00 PM#
Me.Label1 = Format(x, "hh:mm")

JB

Bonjour,

J'ai "pioché" des lignes de code dans l'aide VBA et essayé d'adapter pour
changer le format d'un "label" dans un "UserForm".

Dim MyTime, MyDate, MyStr
MyStr = Format(Données.Saisie_Début, "hh:mm")

J'ai essyé de mettre le code dans le "UserForm - Initialize" mais il ne se
passe rien. Le format de mon "Label" reste "00:00:00" à l'affichage de mon
"UserForm".

Si vous pouvez me renseigner, merci d'avance.


Avatar
Tatane
Salut *JB*,

Quand j'affiche mon userform je vois * 12:30 * dans mon label alors que se
serait mieux vide et quand je remplit mon label, il me l'affiche toujours à
l'ancien format (00:00:00). Ai-je loupé quelque chose ?


Bonjour,

x = #12:30:00 PM#
Me.Label1 = Format(x, "hh:mm")

JB

Bonjour,

J'ai "pioché" des lignes de code dans l'aide VBA et essayé d'adapter pour
changer le format d'un "label" dans un "UserForm".

Dim MyTime, MyDate, MyStr
MyStr = Format(Données.Saisie_Début, "hh:mm")

J'ai essyé de mettre le code dans le "UserForm - Initialize" mais il ne se
passe rien. Le format de mon "Label" reste "00:00:00" à l'affichage de mon
"UserForm".

Si vous pouvez me renseigner, merci d'avance.