Date du jour dans l'onglet concerné

Résolu/Fermé
DodoMichelle - 8 mars 2022 à 19:32
 DodoMichelle - 10 mars 2022 à 08:10
Bonjour,

Je souhaiterais dans un fichier Excel ci dessous ( vierge) que chaque fois que je modifie un onglet , la date de modification s'incrémente automatiquement en cellule A1 par exemple.

Exemple: si je fais une modif dans l'onglet avril le 08/03, la date du 08/03 apparaît uniquement dans l'onglet avril en cellule A1

Merci de votre aide.
Cdlmnt
Dodo

https://www.cjoint.com/c/LCisAytymkK

Configuration: Windows / Chrome 99.0.4844.51
A voir également:

8 réponses

Mike-31 Messages postés 18351 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 12 décembre 2024 5 110
Modifié le 8 mars 2022 à 20:28
Bonjour,

Afficher l'heure dans une cellule ne pose pas de problème, par contre si on écrit un code il faut savoir qu'elle cellules sont sous contrôle sinon chaque fois que tu interviendras dans une cellule la date changera,
l'autre problème est que si tu fais une erreur un code VBA ne permet pas d'annuler la dernière action, pour revenir en arrière la seule solution est de fermer le fichier sans l'enregistrer

sinon dans la Thiswokbook

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
[A1] = Now
End Sub

0
Raymond PENTIER Messages postés 58763 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 18 décembre 2024 17 255
8 mars 2022 à 22:45

Bonjour Dodo.

" chaque fois que je modifie un onglet " ! Je me dois de te rappeler, pour toi et pour les débutants en Excel qui liront cette discussion, que l'onglet c'est juste l'excroissance, en bas de la feuille, où s'inscrit le nom de celle-ci !
0
DodoMichelle
9 mars 2022 à 21:42
Bonsoir Mike et Raymond,

Je suis désolé, mais chaque fois que je modifie dans un onglet, Excel cesse de fonctionner!

Je joins le fichier en question
Cdlmnt
Dodo

https://www.cjoint.com/c/LCjuP62uiGK
0
Mike-31 Messages postés 18351 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 12 décembre 2024 5 110
9 mars 2022 à 22:21
Re,

écrit le code dans la Thiswokbook comme cela

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
Sh.Range("A1").Value = Now
End Sub
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
DodoMichelle
9 mars 2022 à 23:01
Re,

Ecrit comme cela, ca marche mais tous les onglets s'incrémentent en même temps!
J'ai mal posé mon pb: je voudrais uniquement la date dans l'onglet modifié.
Est ce possible?

Cdlmnt
Dodo
0
Raymond PENTIER Messages postés 58763 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 18 décembre 2024 17 255
9 mars 2022 à 23:09
... dans la
feuille
modifiée !
0
DodoMichelle
9 mars 2022 à 23:22
Désolé Raymond pour la confusion.

Cdlmnt
Dodo
0
Mike-31 Messages postés 18351 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 12 décembre 2024 5 110
10 mars 2022 à 07:57
Re,

Et bien la date ne s'enregistre que dans l'onglet modifié pas dans les autres
0
DodoMichelle
10 mars 2022 à 08:10
Bonjour Mike,

En effet , j'ai fait une modif ce matin dans une feuille, les autres n'ont pas évolué! Contrairement à hier où toutes mes feuilles avaient la même date.
Certainement une erreur de manip de ma part puisque sans rien faire, tout est ok.
Merci beaucoup pour ton aide.
Cdlmnt
Dodo
0