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

[Titou99]

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

 

[jmfmarques]

Bonjour
Utilise la procédure évènementielle Worksheet_Change, dans laquelle tu inscris la date du jour dans la colonne de ton choix.

 

[Pounet95]

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

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

 

[Titou99]

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]

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 --->>

If target.column <> 24 then
  '.......
end if

Non ?

 

[Pounet95]

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" ?

 

[Titou99]

UP

 

[patricktoulon]

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

 

[Titou99]

Des données qui viennent d'une autre feuille donc pas de saisie a proprement parler mais juste un lien par cellule exemple : "=Feuil1!A12"

Et non ce ne sont pas des dates

Merci de ta réponse, je vais voir ca

 

[patricktoulon]

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 😉

 

[Titou99]

Conseil de pro VBA, j'applique tout de suite votre ordre chef 😛

Merci quand même !

 

[patricktoulon]

re
pas pro logique 😉
disons que les questions que j'ai posé t'aurai du être posé des le départ

 

[Titou99]

C'est vrai mais pas grave je trouverais un moyen on peut tout faire sur Excel.

Je met le fil en résolu ou je laisse ca comme ca ?

 

[patricktoulon]

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

 

[Titou99]

Le mieux serais à chaque fois qu'une donnée change dans le tableau donc au bout dans la colonne X avoir automatiquement la date