Referencing a cell in the header

[KimberlyC]

Hi

Is it possible to reference a cell ( for example A8) of the active worksheet
in the header section of the worksheet (for printing purposes).?

If yes... how???

Thanks in advance for you help!
It's greatly appreciated.
Kimberly

 

[Bob Phillips]

This code, placed in the ThisWorkbook code module, automatically picks up
the cell value when printing.


Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = Activesheet.Range("A8").Value
End Sub



--

HTH

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

 

[Paul B]

Kimberly, some thing like this

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightHeader = Range("A8")
End Sub


To put in this macro, from your workbook right-click the workbook's icon and
pick View Code. This icon is to the left of the "File" menu this will open
the VBA editor, in the left hand window double click on thisworkbook, under
your workbook name, and paste the code in the window that opens on the right
hand side, press Alt and Q to close this window and go back to your
workbook, now this will run every time when you print the workbook. If you
are using excel 2000 or newer you may have to change the macro security
settings to get the macro to run.




--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

 

[KimberlyC]

Thanks to both of you...