Datum, van de laatste keer dat de sheet opgeslagen is, in een cel weergeven...!

[McMacro]

Beste Exceller('s),

Ik zou graag in een Worksheet in cel C10 de datum willen plaatsen van de laatste keer is opgeslagen. Of een knop met de functie dat ie bij klikken de datum van vandaag/nu weergeeft en niet meer wijzigt totdat ik weer op de knop klik. Ik denk dat het heel simpel is, maar ik kan niet vinden hoe ik dit moet realiseren.

Dus het mag met een formule of met een knop met VBA.

Ik hoop dat jullie er iets mee kunnen. Veel succes !!! :thumb:

Met vriendelijke groet,



McMacro

PS Ik werk met Excel 2000

 

[Cobbe]

Met deze code zal dat wel lukken:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets(1).Cells(10, 3) = Date 'of now als je de tijd er bij wil
End Sub

 

[McMacro]

Bedankt voor de moeite Cobbe.

Uiteindelijk heb ik toch voor een combi gekozen die automatisch de datum van het moment van afdrukken in de juiste cel zet als ik de sheet afdruk.
Dus als aanvulling op een reeds bestaande macro.

Met vriendelijke groet,



McMacro