Macro : si cellule change alors date

Résolu/Fermé
Roro - 23 mars 2015 à 16:47
 Roro - 24 mars 2015 à 13:43
Bonjour à tous,

Je cherche depuis ce matin sans résultat :( j'espère que vous allez pouvoir m'aider :D

Comme indiqué dans le titre je cherche une macro me permettant d'afficher dans une cellule A1 la date du jour lorsque une cellule A2 est modifié.
Pour être sur de me faire comprendre tant que A2 n'est pas modifier, rien ne doit se passer mes si A2 est modifié alors je veux faire apparaître la date en A1.

J'ai déjà trouvé des macros me permettant d'effectuer cette action pour une cellule mais mon objectif est que cette opération se répète sur toute la longueur de ma colonne de façon automatique.

Quel formule puis je utiliser?
A voir également:

1 réponse

ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 2 404
Modifié par ccm81 le 23/03/2015 à 16:59
Bonjour

A mettre dans le module de a feuille à traiter

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("B")) Is Nothing Then
  Target.Offset(0, -1).Value = Date
End If
End Sub

Cdlmnt
1
C'est exactement ce que je cherchais merci beaucoup !!
0