Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Indication de date de modification de cases dans une ligne

leeroy

XLDnaute Nouveau
Bonjour,
Je souhaite créer un VBA qui indique la date de modification de case appartenant à une ligne. Les explications n'étant pas forcément simple, veuillez trouver ci-joint un exemple.
Merci par avance,
Leeroï
 

Pièces jointes

  • Date de modification.xlsx
    11.2 KB · Affichages: 3

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

Dans le fichier joint, un click-droit sur le nom de l'onglet puis 'Visualiser le code' vous amènera vers :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B1:F10")) Is Nothing And Target.Count = 1 Then Cells(11, Target.Column) = Date
End Sub

Bon après-midi
 

Pièces jointes

  • Date de modification.xlsm
    16.9 KB · Affichages: 3

Discussions similaires

Réponses
2
Affichages
130
Réponses
2
Affichages
136
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…