Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell value in footer
How can i put the value (text) of a cell in the left footer ?
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell value in footer
You need to use a VBA macro to do that. Assuming the cell value changes, it
would be a BeforePrint event macro. On Wed, 27 Oct 2004 21:59:00 +0200, "Luc Ferrari \(Thuis\)" wrote: How can i put the value (text) of a cell in the left footer ? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell value in footer
Example : this example use cell A1 of "Sheet1" on each sheet you print
Right click on the Excel icon next to File in the Worksheet menu bar Choose view code Paste this event there Alt-q to go back to Excel Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim wkSht As Worksheet For Each wkSht In ThisWorkbook.Worksheets wkSht.PageSetup.LeftFooter = ThisWorkbook.Sheets("Sheet1").Range("A1").Text Next wkSht End Sub -- Regards Ron de Bruin http://www.rondebruin.nl "Myrna Larson" wrote in message ... You need to use a VBA macro to do that. Assuming the cell value changes, it would be a BeforePrint event macro. On Wed, 27 Oct 2004 21:59:00 +0200, "Luc Ferrari \(Thuis\)" wrote: How can i put the value (text) of a cell in the left footer ? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
cell value in header or footer | Excel Discussion (Misc queries) | |||
Reference a footer in a cell | Excel Worksheet Functions | |||
Take a Cell and add it to the Footer or Tab | Excel Worksheet Functions | |||
Contents of cell in footer | Excel Discussion (Misc queries) | |||
Landscape Orientation when Footer set using mso-footer-data Disappear | Excel Programming |