Cell values in Footer

[Raymond]

Hello all,

Does anybody know if it is possible to put cell values in a footer? For example: I need the value of cell A1 of Sheet1 to appear in a footer. In regular sheets you just use =Sheet1!A1 . But such constructions do need work in the footer/header. Anyone? A solution? Thanks in advance!!!

Raymond

 

[Dave Hawley]

Hi Raymond

Right click on the Excel icon, top left next to file and select "View Code", paste in this.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Me.ActiveSheet.Name = "Sheet1" Then
Me.ActiveSheet.PageSetup.LeftFooter = Range("A1")
End If
End Sub

 

[Raymond]

Thanks Dave! It works only for one sheet (Sheet1) like this, but I have the clue how to work with it ... thank you very much!