Macro aujourdhui

Bonjour,
s'il vous plait quelle est la macro qui me permet ceci:
si je remplis une cellule An la cellule Bn m'affiche automatiquement la date du jour j;
si demain je remplis la cellule An+1 la cellule Bn+1 m'affiche la date du jour j+1
merci

2 réponses

  1. Salam faouzi29.

    Si j'ai bien compris, ton problème c'est que comme tu utilises la fonction =AUJOURDHUI() pour afficher la date d'aujourd'hui, il se fait que chaque jour où tu ouvres ton fichier, tu trouves toujours la date du jour à la place de la fonction, et c'est normal car elle se recalcule à chaque fois.

    Voici un fichier exemple dans lequel tu saisis quelque chose dans la colonne 1 et la date du jour s'affiche automatiquement dans la colonne 2.

    https://www.cjoint.com/?CFjqK7LD7we

    Le code VBA est commenté. Répond-moi si tu as des questions.

    :)
    0
    1. Pour RachelMartel, "An" c'est colonne A ligne n et "Bn" c'est colonne B ligne n. : )
      0
    2. C'est moi ou il n'y a pas de macro dans ton fichier? Il n'est même pas enregistré en format qui accepte les macros. Je serais intéressée à la voir :)
      0
    3. Au temps pour moi (http://www.academie-francaise.fr/la-langue-francaise/questions-de-langue#16_strong-em-au-temps-pour-moi-em-strong).

      Je re-joins le fichier au bon format : https://www.cjoint.com/?CFtpWPS9cSv

      En fait, le code est très simple :
      Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Column = 1 Then Cells(Target.Row, 2) = Date
      End Sub
      


      A chaque saisie dans la colonne A, la date du jour est inscrite en colonne B dans la même ligne.

      Encore une fois, 1001 excuses pour ma méprise. :)
      0
    4. Super merci ça fonctionne! Par contre je ne comprends pas pourquoi le lien de l'académie française?
      0
    5. Salam RachelMartel.

      J'allais écrire "autant pour moi" puis je me suis souvenu que c'était plus juste d'écrire "Au temps pour moi", alors j'ai voulu attirer l'attention des futurs lecteurs là-dessus... simplement pour la culture générale. :)
      0