Microsoft 365 Mettre/figer une date de la dernière modification de l'onglet ?

anthoYS

XLDnaute Barbatruc
Bonjour


Ayant un fichier avec de nombreux onglets. Je voudrais un code VB ou une macro me permettant d'afficher ça quelque part dans l'onglet en cours...


Merci
Cordialement
 

Pièces jointes

  • Doss545210.xlsx
    11.5 KB · Affichages: 4
Dernière édition:
Solution
Bonjour
Voici un essai à placer dans ThisWorkbook. Ce sera la cellule A1 de chaque onglet. A modifier le cas échéant.

VB:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Sh.Cells(1, 1).Value = "Dernière modification : " & Now
End Sub

fcyspm30

XLDnaute Junior
Bonjour
Voici un essai à placer dans ThisWorkbook. Ce sera la cellule A1 de chaque onglet. A modifier le cas échéant.

VB:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Sh.Cells(1, 1).Value = "Dernière modification : " & Now
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
314 190
Messages
2 107 001
Membres
109 735
dernier inscrit
Mounskad