Sujet Précédent Sujet Suivant

[Google Sheets] Afficher date de modification d’une cellule

Fermé
Cmoi2025 - Modifié le 26 août 2019 à 10:07
PapyLuc51 Messages postés 4419 Date d'inscription dimanche 3 mai 2009 Statut Membre Dernière intervention 15 décembre 2024 - 12 sept. 2019 à 14:58
Bonjour

Je dois afficher la date de modification de centaine de cellules d’une colonne dans la colonne de droite en face de chaque cellule concernée.
Existe-t-il une fonction qui affiche la date de modification (et l’heure si possible) de la cellule de gauche ?

En vous remerciant d’avance
A voir également:

2 réponses

Réponse 1 / 2
PapyLuc51 Messages postés 4419 Date d'inscription dimanche 3 mai 2009 Statut Membre Dernière intervention 15 décembre 2024 1 448
12 sept. 2019 à 14:58
Bonjour,

Voir la réponse que j'ai faite >>>> ICI <<<<

Cordialement
1
Réponse 2 / 2
PapyLuc51 Messages postés 4419 Date d'inscription dimanche 3 mai 2009 Statut Membre Dernière intervention 15 décembre 2024 1 448
26 août 2019 à 10:26
Bonjour

En B2 pour A2

=Si(A2<>"";MAINTENANT();"")

Cordialement
0
Cmoi2025
26 août 2019 à 10:31
Bonjour
C'est une piste, mais la date change en permanence
Je cherche à afficher la date de modification de la cellule
0
PapyLuc51 Messages postés 4419 Date d'inscription dimanche 3 mai 2009 Statut Membre Dernière intervention 15 décembre 2024 1 448 > Cmoi2025
26 août 2019 à 10:54
Oui en effet , je crois qu'il va falloir passer par du VBA ; alors je tu laisse entre des mains expertes

Cordialement
0
PapyLuc51 Messages postés 4419 Date d'inscription dimanche 3 mai 2009 Statut Membre Dernière intervention 15 décembre 2024 1 448
Modifié le 31 août 2019 à 07:49
Bonjour,

En fait de VBA c'est plutôt le langage JAVA sur Google Sheets.

En fouillant sur le net j'ai trouvé ce code en VBA qui fonctionne très bien sur excel ; la date et l'heure ne se change que si on modifie la cellule de gauche. Comme je n'ai aucune connaissance en anglais je ne sais pas ce qu'il veut dire à part la sélection de la colonne source. 

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
Target.Offset(0, 1) = Now
End If
End Sub


Voilà, il y a certainement quelqu'un qui va transcrire en langage pour Sheets

Cordialement
0