Discussion :

[ImWellan]

Je sais que le sujet est lancé depuis un moment mais il correspond exactement à mon besoin actuel à un détail près.

J'utilise la macro du Répondant #19 et elle fonctionne très bien sur Windows. Mon problème c'est que j'utilise mon cellulaire pour modifier mes colonnes. moi, je me fiche que la date n'apparaisse pas sur mon cell mais j'aimerais tout de même que, malgré le VGA qui n'est pas prit en compte sur Android, le résultat apparaisse tout de même sur l'ordinateur quand je l'ouvrirai plus tard. Est-ce possible?

Merci!

[ImWellan]

bonjour,
je me suis permis de piquer le code car il correspond à mon besoin et fonctionne plutôt bien....
sauf que je l'ai légèrement modifié pour que ça fonctionne sur 2 cellules.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub WorkSheet_Change(ByVal Target As Range)
 
If Target.Column = 1 or 2 Then
    Cells(Target.Row, 4) = Now
End If

si j'apporte une modification en colonne A ou B La date s'affiche en D. Mais le problème, si je modifie juste C ça affiche également la date en D... ce que ne souhaite pas.

que faut-il faire svp ?

Enfaite, tu y étais presque. il faut que tu isoles ta demande en select case comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub WorkSheet_Change(ByVal Target As Range)
Select Case Target.Column
    Case 1, 2,
    Cells(Target.Row, 4) = Now
End Select
 
End Sub

[niicos54]

Voici une autre solution :

Private Sub worksheet_change(ByVal Target As Range)

If Target.Column = 18 Or Target.Column = 19 Or Target.Column = 20 Then
Cells(Target.Row, 22) = Now
End If

End Sub