Right_Click on a Tab, choose View Code, then double-click ThisWorkbook of
your project..
Click on the Left-Box down-arrow select Workbook in the right_box down-arrow
select Before Print
Type in line 2 below:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = Range("A1").Value 'LeftFooter for
example with Cell A1 Value
End Sub
HTH
"Micah J" <(E-Mail Removed)> wrote in message
news:821ADBF8-B2CA-4115-8164-(E-Mail Removed)...
> Is it possible to insert a cell value in a header or footer?
>
> Thanks,
>
> Micah
|