Functions for Headers/Footer

[folderno32]

Is it possible to enter in "Last printed on" and this sort of function
like the ones avaiable in Word.

where could I find the VB references for these functions.

Thank you

 

[Bob Phillips]

You can do this from Page Setup in Excel.

If you want VBA, put this in ThisWorkbook

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet
.PageSetup.LeftFooter = "Last Printed on: " & Format(Date, "dd mmm
yyyy")
End With
End Sub


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)