• Initiateur de la discussion Initiateur de la discussion Philippe
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

Philippe

Guest
Bonjour à vous tous !!!

J'aimerais récupérer dans une celulle l'heure dynamique !!!

Je pensais utiliser Application.OnTime Now + TimeValue('00:00:01'), 'Heure'

Mais comment on s'en sert, parce que les exemples sur l'aide de VBA excel sont pas forcément des plus explicitent !!!

Je vous remercie grandement
 
Bonsoir à tous

Sub hrdyn()

Application.OnTime Now + TimeValue('00:00:30'), 'hrdyn'
Range('a1').Value = Now
End Sub


un petit call hrdyn et ça démarre.


mise à jour toutes les 30 s

Message édité par: dg62, à: 08/03/2005 18:38
 
Bonsoir Tcho! Philippe, le Forum

Euh je ne veux pas paraître bégueule, mais si c'est ta signature pour 'Nathan...' c'est pas vraiment le style de la maison B)

Pour ce qui est de :

Application.OnTime Now + TimeValue('00:00:01'), 'Heure'


Cette ligne de code est prévue pour lancer une seconde après avoir tournée une autre macro qui serait nommée 'Heure'....

Pour récupérer l'heure 'dynamique' il faudrait faire tourner en boucle une macro qui écrirait sur ta cellule :

Range('A1') = Format(Now, 'HH : MM : SS')...

Elle pourrait justement se nommer 'Heure'... Et être lancée par la ligne de code que tu as trouvée... Mais c'est vraiment dans le gadget, car le OnTime te fera vraiment des soucis...

Sinon en plus simple, il a y un activeX StatusBar Control que j'ai rencontré grace à Ti... Voir ce Fil Lien supprimé

Bonne Soirée
@+Thierry

Message édité par: _Thierry, à: 08/03/2005 18:46
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
9
Affichages
324
J
Réponses
13
Affichages
3 K
V
Réponses
0
Affichages
1 K
Va2_80
V
Retour