VBA - date and time on save doc
Post date: Sep 9, 2015 9:32:30 AM
Alla chiusura del workbook:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Me.Worksheets("Foglio1")
.Range("A1").Value = "=TODAY()"
End With
End Sub
Ad ogni salvataggio(ribadisco: ogni salvataggio):
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
With Me.Worksheets("Foglio1")
.Range("A1").Value = "=TODAY()"
End With
End Sub
Qui metto la data in A1 del Foglio1. Modificare di conseguenza.