XL 2019 Si je modifie les données en I1, afficher la date du jour en J1 ?[résolu]

anthoYS

XLDnaute Barbatruc
Bonjour,


Comment faire pour faire ceci ?
en fait, il s'agit d'un kilométrage, de fait, je veux que ça affiche aujourd'hui() en J1 si modification de ce kilométrage qui ne peut avoir lieu qu'au jour ou on le fait (aujourdhui()).


Merci
 

Pièces jointes

  • duzMkRD.jpeg
    duzMkRD.jpeg
    32.2 KB · Affichages: 10
Solution
Bonjour,
Place cette macro dans la feuille de ton classeur
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("I1")) Is Nothing Then
    If Target.Count > 1 Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Target.Offset(, 1) = Date
  End If
End Sub

M12

XLDnaute Accro
Bonjour,
Place cette macro dans la feuille de ton classeur
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("I1")) Is Nothing Then
    If Target.Count > 1 Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Target.Offset(, 1) = Date
  End If
End Sub
 

job75

XLDnaute Barbatruc
Bonjour anthoYS,

Activez le calcul itératif (menu Fichier-Options-Formules) et entrez en J1 :
Code:
=SI(I1="";"";SI(CELLULE("address")=CELLULE("address";I1);AUJOURDHUI();J1))
A+
 

Pièces jointes

  • Calcul itératif(1).xlsx
    9.8 KB · Affichages: 1

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 823
dernier inscrit
ben talha redouane