Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…