OVH Cloud OVH Cloud

Pourquoi je n'y arrive pas

2 réponses
Avatar
Bruno ALEMANNO
Re bonsoir à tout le groupe

Cela fait des heure que je planche par de multiple essai
et conseils reçu ici, j'en profite pour les remercier

J'essaie par l'action d'un bouton ce trouvant sur une feuille ouvrir un
UserForm
jusque là OK, il s'ouvre.
dans ce UserFormHeure et à l'ouverture dans les deux TextBox
1 Avoir l'heure de Maintenant
2 Avoir la date actuelle mais là j'ai eu la solution ici "MERCI"
Me.TextBox1_Date = Format(Date, "dd/mm/yyyy")
Me.TextBox2_Heure = Format(Now, "hh:mm:ss")
Pourquoi la date OK et pas l'heure de maintenant

Encore merci
Amicalement
Bruno

2 réponses

Avatar
MichDenis
Bonjour Bruno,

modifie ceci :

Me.TextBox2_Heure = Format(Now, "hh:mm:ss")

Par

Me.TextBox2_Heure = Format(Time, "hh:mm:ss")


Salutations!


"Bruno ALEMANNO" a écrit dans le message de news:
Re bonsoir à tout le groupe

Cela fait des heure que je planche par de multiple essai
et conseils reçu ici, j'en profite pour les remercier

J'essaie par l'action d'un bouton ce trouvant sur une feuille ouvrir un
UserForm
jusque là OK, il s'ouvre.
dans ce UserFormHeure et à l'ouverture dans les deux TextBox
1 Avoir l'heure de Maintenant
2 Avoir la date actuelle mais là j'ai eu la solution ici "MERCI"
Me.TextBox1_Date = Format(Date, "dd/mm/yyyy")
Me.TextBox2_Heure = Format(Now, "hh:mm:ss")
Pourquoi la date OK et pas l'heure de maintenant

Encore merci
Amicalement
Bruno
Avatar
GD
Bonsour® Bruno ALEMANNO
;o)))
ne te vexes pas ...
mais Now signifie Maintenant en grand breton !!!
on peut ecrire également :
Me.TextBox1_Date = Format(Now, "dd/mm/yyyy")
Me.TextBox2_Heure = Format(Now, "hh:mm:ss")

si tu veux que l'heure soit l'heure actualisée ,
il te faut activer
soit un rafraichissement cyclique (gourmand en CPU selon la fréquence
souhaité)
soit un rafraichissement sur ordre de :
Me.TextBox2_Heure = Format(Now, "hh:mm:ss")

@+



wrote:
Re bonsoir à tout le groupe

Cela fait des heure que je planche par de multiple essai
et conseils reçu ici, j'en profite pour les remercier

J'essaie par l'action d'un bouton ce trouvant sur une feuille ouvrir
un UserForm
jusque là OK, il s'ouvre.
dans ce UserFormHeure et à l'ouverture dans les deux TextBox
1 Avoir l'heure de Maintenant
2 Avoir la date actuelle mais là j'ai eu la solution ici "MERCI"
Me.TextBox1_Date = Format(Date, "dd/mm/yyyy")
Me.TextBox2_Heure = Format(Now, "hh:mm:ss")
Pourquoi la date OK et pas l'heure de maintenant

Encore merci
Amicalement
Bruno