Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Horloge

phlaurent55

Nous a quittés en 2020
Repose en paix
Bonjour à toutes et tous,

Suite à un petit défi avec un ami qui me demandait de créer une animation de shapes en utilisant une barre de défilement, je me suis amusé à faire une Rotation de shapes en fonction du temps qui passe.

voici le résultat en pièce jointe (version 2007)

Je ne pose pas de question concernant ce fichier
............ si quelqu'un veut l'améliorer, il le peut

à+
Philippe
 

Pièces jointes

  • HORLOGE.xlsm
    22.9 KB · Affichages: 232

eriiic

XLDnaute Barbatruc
@Grisan,
avec un tel cadran, il fallait également mettre les valeurs des secondes en chiffres Romains
c'est fait, voir fichier joint
Amusant
Mais cela pose une question essentielle...
Comment faut-il écrire 4 s en romain ?
IV, ou bien IIII comme le font les vrais horlogers pour 4h et comme le montre (sans jeu de mot) ton fond.
Il va falloir trouver une clepsydre d'époque donnant la seconde et graduée en chiffres romains, pas simple ;-)
 

grisan29

XLDnaute Accro
bonsoir a vous
mon horloge qui fait quand même 3 fois mon age n'as que des tirets pour les minutes et bruit du tictac pour les secondes dont voici son vrai cadran
 

Pièces jointes

  • horloge.jpg
    272.7 KB · Affichages: 103

Si...

XLDnaute Barbatruc
Bonjour

Etant actuellement dans les "Shapes", je continue en mélangeant les genres, avec une seule macro (IN/OUT)et le Beep pour signal.

Je n'arrive pas à supprimer le curseur. Si quelqu'un(e*) a une idée … (à part le déplacer au centre pour un autre effet)

*sais-tu ÔÒ si ton spécialiste HP (Heure Pétante) a une idée ?
 

Pièces jointes

  • HORLOGE(3).xlsm
    22.2 KB · Affichages: 87

DoubleZero

XLDnaute Barbatruc
Bonjour, le Fil , le Forum,

@ Si,

Sans vouloir être désagréable : HP ne signifie pas "Heure Pétante" mais "Hrrible Prestataire" !

Bravo pour tous vos superbes travaux.

P. S. : je ne déposerai aucun fichier qui laisse apparaître un coucou chantant les heures !..

A bientôt
 

job75

XLDnaute Barbatruc
Bonjour à tous,

Belle réalisation Philippe.

Ci-joint ton fichier du post #12 avec le tic-tac créé par l'API Windows beep_api :
Code:
Declare Function beep_api Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
A+
 

Pièces jointes

  • Horloge(1).xlsm
    167.6 KB · Affichages: 90

job75

XLDnaute Barbatruc
Re,
les clic ne sont pas réguliers
Tu as raison grisan29, la synchronisation avec l'horloge de l'ordi n'était pas bonne.

Ceci à l'air de convenir chez moi sur ce fichier (2) :
Code:
t = Format(t + 1 / 86400, "d/m/yy h:m:s")
Application.OnTime t, "my_Procedure"
Qu'est-ce que ça donne chez vous les amis ?

A+
 

Pièces jointes

  • Horloge(2).xlsm
    167.2 KB · Affichages: 70

Discussions similaires

Réponses
10
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…