Inserer une date dans excel

teddy -  
 teddy -
Bonjour,
Je souhaiterai inserer une date dans une cellule sous excel mais qui ce met a jour a la date du moment présent dès que je touche une autre cellule.
comment faire ?

Merci

6 réponses

  1. Gord21 Messages postés 928 Statut Membre 289
     
    Bonsoir,
    Tu peux utiliser la formule
    =AUJOURDHUI()


    @+
    0
  2. Migou76 Messages postés 506 Date d'inscription   Statut Membre Dernière intervention   20
     
    Bonsoir,

    Je ne sais plus faire, mais il est sûr qu'il faut passer par une macro.
    Il existe une procédure "lorsque j'active", "on activate". après quoi, c'est encore du chinois, "Year, months, days"

    Bon courage !
    0
  3. teddy
     
    j'ai vu qu'il y avait une formule avec =AUJOURDHUI ou avec =SI mais je ne voit pas comment elle fonctionne. Ca ne fonctionne pas avec moi
    0
  4. Gord21 Messages postés 928 Statut Membre 289
     
    Bonjour,
    Tu entres juste la formule
    =AUJOURDHUI()
    dans la cellule où tu veux qua la date apparaisse.
    Remarque : elle se met à jour dès que tu ouvres le classeur, elle n'attend pas que tu cliques sur une cellule.

    @+
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Migou76 Messages postés 506 Date d'inscription   Statut Membre Dernière intervention   20
     
    Bonjour,

    Ca doit être quelque chose comme cela :

    - ALT F11 pour passer en VBA,
    - Dans la fenêtre projet, double-click sur Feuil1,
    - En haut de la fenêtre de code, dérouler "Général" pour afficher "WorkSheet",
    - Dérouler la liste des évènements pour afficher "Change"
    - Tu obtiens alors une procédure événementielle :

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address="$A$1" Then
    Range(A2) = Day(Now) & "_" & Month(Now) & "_" & Year(Now)
    End If
    End Sub
    0
    1. Gord21 Messages postés 928 Statut Membre 289
       
      Bonsoir,
      J'utiliserais plutôt l'évènement SelectionChange, ce qui donnerait :
      Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      If Target.Address = "$A$1" Then
        Range("A2") = Day(Now) & "/" & Month(Now) & "/" & Year(Now)
      End If
      End Sub

      @+
      0
    2. Migou76 Messages postés 506 Date d'inscription   Statut Membre Dernière intervention   20
       
      Bon, je pensais l'avoir fait, mais vous devez avoir raison. Le plus important est de voir si tout ceci est accessible à teddy...
      0
    3. Gord21 Messages postés 928 Statut Membre 289
       
      La différence : WorkSheet_Change est déclenché lorsqu'une cellule est modifiée (valeur, format, ...) alors que Worksheet_SelectionChange l'est lorsque la sélection est modifiée c'est-à-dire lorsque l'on sélectionne une autre cellule ou plage...

      @+
      0
    4. Migou76 Messages postés 506 Date d'inscription   Statut Membre Dernière intervention   20
       
      D'accord, je n'avais pas compris. Moi, j'ai lu dès qu'on touche une autre cellule (que je pensais unique) et vous une autre cellule (n'importe laquelle).

      Comme quoi, le langage informatique n'a pas de place pour l'interprétation !
      C'est bête, mais je trouve cela très drôle.
      0
  7. teddy
     
    d'accord je pense que c'est ce que je recherche mais où doit-je l'écrire cette formule enfin ce texte ?
    0