IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Excel Discussion :

Afficher l'heure en temps réel sur mon USF


Sujet :

Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Educateur
    Inscrit en
    Avril 2015
    Messages
    25
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : Educateur
    Secteur : Enseignement

    Informations forums :
    Inscription : Avril 2015
    Messages : 25
    Par défaut Afficher l'heure en temps réel sur mon USF
    Bonjour,
    pour afficher une date sur mon USF j'ai le code suivant:
    dans Userform_initialisez de mon userform
    Tetxbox1 = Date
    Maintenant j'aimerais savoir le code à utiliser pour afficher l'heure en temps réel.
    Merci de m'aider

  2. #2
    Membre Expert
    Homme Profil pro
    Chef de projet en SSII
    Inscrit en
    Novembre 2011
    Messages
    1 503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Irlande

    Informations professionnelles :
    Activité : Chef de projet en SSII

    Informations forums :
    Inscription : Novembre 2011
    Messages : 1 503
    Par défaut
    Bonjour vitalus,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Sub majHeure()
     UserForm1.TextBox1 = Format(Now, "hh:mm:ss")
     temps = Now + TimeValue("00:00:1")
     Application.OnTime temps, "majHeure"
    End Sub
     
    Sub auto_close()
     On Error Resume Next
     Application.OnTime temps, Procedure:="majHeure", Schedule:=False
    End Sub
     
    Sub afficheform()
       UserForm1.Show
    End Sub
    et dans ton UserForm :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    Private Sub UserForm_Initialize()
       majHeure
    End Sub
     
     
    Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
      auto_close
    End Sub
    N'hésite pas à revenir vers moi !

    Cordialement,
    Kimy

  3. #3
    Expert confirmé
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132
    Par défaut
    Salut, un exemple ( temporaire ) à élaguer, car au départ c'était un chrono.
    Images attachées Images attachées  

Discussions similaires

  1. Date et heure en temps réel sur une bande noire !
    Par cincap dans le forum Général JavaScript
    Réponses: 23
    Dernier message: 15/02/2014, 22h41
  2. [FAQ] Comment afficher l'heure en temps réel ?
    Par Auteur dans le forum Contributions JavaScript / AJAX
    Réponses: 17
    Dernier message: 21/02/2013, 17h13
  3. Comment afficher l'heure en temps réel ?
    Par simone.51 dans le forum Téléchargez
    Réponses: 0
    Dernier message: 04/10/2011, 17h33
  4. Afficher l'heure en temps réel
    Par Kel-T dans le forum Général JavaScript
    Réponses: 10
    Dernier message: 08/06/2010, 16h47

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo