Last printed at ......

[neilp]

Hi All

I have a document that is changed and printed regularly. I have the header set up to show the time that it was printed.

Is there anyway i can record this time in the spreadsheet itself so that when someone comes to me with a sheet saying 09:15, I can open the spreadsheet and see that they are working on an old copy, because the last time it was printed was 09:22?

thanks in advance

Neil

 

[eddvrs]

This should work

Private Sub Workbook_BeforePrint(Cancel As Boolean)

     Range("A1").value = "Last printed: " & Format(Now(), "dd/MM/yyyy hh:mm")

End Sub

 

[neilp]

Brilliant, you are a star