akhlan
XLDnaute Nouveau
Bonjour,
j'ai mis ce petite morceau de script en place mais même s'il fonctionne, j'aurais souhaité une modification...
mon problème vient du fait qu'il faut revenir sur la colonne 2 pour que le timestamp apparaisse en colonne 12. Comment le faire apparaître des l'ajout d'une valeur en colonne 2 ?
PS : le fichier comportera environ 4000 lignes, je ne veux pas d'un script qui checke toute la feuille pour éviter les temps d'attente mais seulement la ligne renseignée...
D'avance merci
Akhlan
j'ai mis ce petite morceau de script en place mais même s'il fonctionne, j'aurais souhaité une modification...
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
AppliqChange Target
'---------------------------------------------------------------------------------------------------------------
' Ajoute la date et l'heure en colonne N
'---------------------------------------------------------------------------------------------------------------
If Target.Column <> 2 Then Exit Sub
If Target.Value <> "" And Cells(Target.Row, Target.Column + 12) = "" Then Cells(Target.Row, Target.Column + 12) = Date & " " & Time
End Sub
mon problème vient du fait qu'il faut revenir sur la colonne 2 pour que le timestamp apparaisse en colonne 12. Comment le faire apparaître des l'ajout d'une valeur en colonne 2 ?
PS : le fichier comportera environ 4000 lignes, je ne veux pas d'un script qui checke toute la feuille pour éviter les temps d'attente mais seulement la ligne renseignée...
D'avance merci
Akhlan