Microsoft 365 Afficher la date de la dernière modification d'une ligne

Titou99

XLDnaute Junior
Bonjour à tous,

Je pense que VBA pourras répondre à ce pb mais je ne sais pas tellement l'utilisé alors voilà en fait, j'aimerais que dans la colonne X de mon tableau soit afficher pour chaque lignes la date de dernière modification.

A votre service pour toutes info supplémentaires.

Titou
 

Pounet95

XLDnaute Occasionnel
Bonjour,
Oui mais pas que :
Il y a risque de réinventer le mouvement perpétuel si on désactive pas les évènements.

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    Cells(Target.Row, 1) = Now
    Application.EnableEvents = True
End Sub
 

Titou99

XLDnaute Junior
Bonjour bonjour,

J'ai un tableau qui va de la colonne A à W, j’aimerais que dans la colonne X donc la suivante avoir la date de la dernière modif de chaque ligne

PS : Dans la feuille où j'aimerais avoir ca, les données sont issus d'une autre feuille donc il n'y pas de mofif direct dans la feuille mais juste un "=" dans chaque cellules du tableau
 

jmfmarques

XLDnaute Accro
Bonjour Pounet95
On ne joue avec les paramètres de l'objet application (et ce n'est jamais totalement sans danger) que lorsqu'il est vraiment impossible de faire autrement. Et il est extêmement aisé de faire autrement dans le cas présent.
Imaginons que la colonne X soit celle d'inscription de la date --->>
VB:
If target.column <> 24 then
  '.......
end if
Non ?
 

Pounet95

XLDnaute Occasionnel
J'avais compris X comme étant une colonne quelconque et non pas la 24.
Bien sûr qu'une fois le choix de cette colonne pour recevoir l'info il faut empêcher son changement autre que par l'évènement Change.
Mais plus gênant est un bug intervenant entre le blocage des évènements et leur déblocage.
Quel autre moyen pour éviter ce que j'ai appelé "mouvement perpétuel" ?
 

patricktoulon

XLDnaute Barbatruc
bonjour
c'est un peu flou
question :
qu'y a t il d'inscrit dans les colonnes A à W (des dates ?,des données?)
si c'est des dates c'est pas trop compliqué avec le max dans l’événement change si intersect A:W en bloquant le intersect colonne "X"
si ça n'est pas des date il va te faloir créer un system de contrôle car ce que tu demande n'existe pas

pour cela peut être utiliser les commentaire pour stoker la date de modif toujours pareille avec les intersect
 

patricktoulon

XLDnaute Barbatruc
hah!! ben la tu est chocolat
il n'y a pas de possibilité de contrôle a moins de faire un sheets mémo avec les valeurs et non les formule
tout simplement par ce que les formules ne déclenche pas l’événement change il est donc impossible de savoir si ce qui était avant a changé

tu peux laisser tomber ce sera trop compliqué
d'autant plus que sans fichier exemple difficile de saisir le contexte

ne t'éternise pas sur cela ça va être une torture ;)
 

patricktoulon

XLDnaute Barbatruc
tu peux le laisser comme ca peut etre que quelqu'un te trouvera une solution

j'ai d'autres questions
par exemple a quel moment ce control doit avoir lieu
si c'est une fois de temps en temps
tu pourrais utiliser un csv ;) sauvegardé et gardé soigneusement
si la valeur du csv est diff on réenregistre le csv avec la date en "X"
;)
tu aurais dans ton csv la date par raport au dernier controle

mais si c'est plus souvent ca marcherait mais plus lourd
 

Discussions similaires