Discussion :

[Markus54]

Bonjour,
je me permets de vous demander de l'aide car je viens de faire mon premier code non sans difficultés, mais je n'arrive pas à obtenir ce que je souhaite.
Je souhaiterais que la date du jour s'affiche dans les colonnes C; E ;G etc lorsque je rentre des informations dans les colonnes B;D;F etc...
J'ai bien réussi à créer le code suivant mais je n'arrive pas à faire la suite :

Worksheet Change

Code :

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

1
2
3
4
5
6
7
8
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Time As Integer
For Time = 2 To 100
If Cells(Time, "B").Value <> "" And Cells(Time, "C") = "" Then Cells(Time, "C") = Date & " "
Cells(Time, "C").NumberFormat = "dd/mm/yyyy"
Next
Range("C:C").EntireColumn.AutoFit
End Sub

Merci de bien vouloir me venir en aide.
Cordialement.
Marc