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

Macros et VBA Excel Discussion :

Chronométrage : recopier l'heure


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Inscrit en
    Mars 2008
    Messages
    11
    Détails du profil
    Informations forums :
    Inscription : Mars 2008
    Messages : 11
    Par défaut Chronométrage : recopier l'heure
    Bonjour,
    Pour un cross de l'école du coin, je voudrais faire une feuille toute simple : je saisis dans A1, puis A2, A3... les numéros des participants lorsqu'ils passent un tour.
    Je voudrais qu'en B1, B2, B3... ça recopie l'heure à la date de saisie, donc l'heure de passage (à quelques instants près . Tout le reste des calculs (moyenne au tour, nb de tours etc), je m'en charge.

    Alors j'ai bien essayé en B1 :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =SI(CELLULE("address")=cellule("address";A1);maintenant();"")
    mais le problème est qu'à la saisie en A2, je perds B1 puisqu'il se met à jour puisque CELLULE("address") a changé...
    A noter que B2, qui est une recopie de B1 et "surveille" donc un changement dans A2, dans ce cas, se met à jour, of course.

    Je me demande si c'est jouable sans macro. Avec, je sais pas faire ; sans non plus, d'ailleurs
    D'où ma demande.
    Il faudrait une macro/formule à appliquer en B1 qui détecte "si changement dans la case à ma gauche, je recopie dans la case à ma droite l'heure, sinon je ne fais rien".

    Merci de votre aide
    (pour de l'excel 2007 et +, même si à mon avis ça ne change rien)

    Jacques

  2. #2
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    Sans macro ou avec macro je ne sais pas tes besoins.
    Sans macro, tu auras à faire à une petite usine à gaz avec des références circulaires et calcul itératif.

    Sinon, avec macro, ci-après code à mettre dans le module de ta feuille

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Worksheet_Change(ByVal Target As Range)
     
    If Target.Column = 1 And Target.Count = 1 Then
        Application.EnableEvents = False
        Target.Offset(0, 1) = IIf(Target = "", "", Now)
        Application.EnableEvents = True
    End If
    End Sub
    Ci-joint autre proposition sans macro utilisant une référence circulaire mais qui nécessite d'activer le calcul itératif d'excel.

    En B1:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =SI(A1<>"";SI(B1="";MAINTENANT();B1);"")
    Tu tires la formule vers le bas autant de lignes que tu veux et bien sur en formatant convenablement la colonne B (jj/mm/yyyy hh:mm:ss).

    Il ne reste que l'inscription des n° de tes participants en colonne A.

  3. #3
    Membre habitué
    Inscrit en
    Mars 2008
    Messages
    11
    Détails du profil
    Informations forums :
    Inscription : Mars 2008
    Messages : 11
    Par défaut
    Un grand merci à toi
    La méthode avec référence circulaire est un peu crade je préfère la version macro
    Merci encore

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [CR ?] Somme d'heure sous Crystal ?
    Par Peter PARKER dans le forum SAP Crystal Reports
    Réponses: 1
    Dernier message: 17/04/2003, 16h24
  2. Heure et Date System
    Par Lux interior dans le forum XMLRAD
    Réponses: 2
    Dernier message: 03/02/2003, 11h35
  3. [VBA-E] [Excel] Lancer une macro à une heure donnée
    Par Lysis dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 16/10/2002, 12h15
  4. [VB6] [Datareport] Heure d'impression ds pied de page
    Par oazar dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 03/10/2002, 10h11
  5. Réponses: 11
    Dernier message: 23/07/2002, 14h33

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