J'ai eu beau chercher sur pleins de forum et le net mais je ne trouve pas de solution à mon problème…. voici ma requête :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A:Q")) Is Nothing Then Exit Sub
Target(1, 30) = Format(Now, "YYYY/MM/DD")
End Sub
Mon problème réside dans le fait que le target prend la 30ème colonne par rapport à la colonne qui a été modifiée. Or, si je modifie à la fois la colonne A + B + D, j'ai 3 colonnes complétées avec la même info. J'aimerai afficher la date seulement dans la colonne "X" peut importe la colonne qui a été modifiée entre A et Q.
Target est déjà en format RANGE mais lorsque je saisie par exemple : target ("X:X") cela ne fonctionne pas … avez-vous des idées ?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Intersect(Target, Range("A:Q")) Is Nothing Then Exit Sub
Cells(Target.Row, 24) = Format(Now, "YYYY/MM/DD")
End Sub