How can I insert a cell reference in a footer (eg for variable foo

W

wngg001

Any ideas on how to do this?
I'm trying to create a template with the doc reference number in the footer
However, I'm trying to avoid users having to edit the footer (because this
just wont get done).
 
B

Bob Phillips

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet
.PageSetup.LeftFooter = .Range("A1").Text
End With
End Sub

This code should go in the ThisWorkbook code module.

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
Top