Microsoft 365 Ajouter une date de création automatique selon colonne A et une date de modification selon colonne F

[domichou]

Bonjour,

C'est la première fois que je fais appel à un forum de discussion pour de l'aide. Je ne suis pas très à l'aide avec VBA et j'aurais besoin d'aide pour l'ajout de 2 dates dans mon fichier Excel.

Voici ce que je voudrais faire:
À chaque fois que je crée une nouveau produit, donc que je saisie un nouveau code dans la colonne A, je voudrais ajouter automatiquement la date du jour (création) dans la colonne G sur la même ligne. Je voudrais également qu'à chaque fois que le prix de l'article dans la colonne F est modifié, avoir la date de modification de ce prix dans la colonne H de la même ligne.
J'ai déjà le code pour la modification du prix et il fonctionne très bien, mais je ne sais pas comment incorporer le code pour la date de création. Si je les mets un à la suite de l'autre, ça ne fonctionne pas. Voici mon code pour la date de modification:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Columns("A6:A")) Is Nothing Then
On Error Resume Next
Application.EnableEvents = False
Cells(Target.Row, 7) = Now
Application.EnableEvents = True
GoTo 0
End If
End Sub
Je vous remercie d'avance pour votre aide

 

[Phil69970]

Bonjour @domichou

Je te propose ce fichier

Avec un fichier de ta part c'est beaucoup mieux cela permet de répondre en rapport avec ton fichier et évite de "taper" à coter.

Merci de ton retour

@Phil69970