VBA Excel 2010 : Date automatique [Résolu/Fermé]

Signaler
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
-
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
-
Bonjour à tous,

J'ai un petit soucis, je suis novice en VBA et j'ai pourtant besoin de l'utiliser encore une fois aujourd'hui.

Pour faire simple :

J'ai un tableau Excel avec plusieurs colonnes (N°, Lieux, Description, Date, Personne, ect..)
J'aimerais créer un code en VBA qui lorsque qu'un N° est tapé sur une ligne de la colonne I, la date du jour s'écrive automatiquement dans cette même ligne dans la colonne O, mais qu'elle puisse être modifier en cas d'encodage en retard par exemple.

Je suis obligé d'utiliser VBA je ne peux pas mettre une formule basique car comme je l'ai dis, les personnes chargées de l'encodage peuvent avoir besoin de modifier cette date pour X ou Y raison et si une formule est déjà écrite dans cette cellule, certain ne voudront pas y toucher.

En espérant que quelqu'un puisse m'aider. Merci d'avance

2 réponses

Messages postés
1263
Date d'inscription
vendredi 23 avril 2004
Statut
Membre
Dernière intervention
15 mai 2017
533
Bonjour,

Code à copier dans le module de feuille:

Private Sub Worksheet_Change(ByVal Target As Range)
i = Target.Row
If Target.Column = 9 Then 'Saisie en colonne 9
Cells(i, 15).Value = Date 'Date fixée en colonne 15
End If
End Sub

Cordialement.
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
18
Ça fonctionne, c'est parfait je te remercie :)

Bonne journée