Cell value in footer

  • Thread starter Thread starter Luc Ferrari \(Thuis\)
  • Start date Start date
L

Luc Ferrari \(Thuis\)

How can i put the value (text) of a cell in the left footer ?
 
You need to use a VBA macro to do that. Assuming the cell value changes, it
would be a BeforePrint event macro.
 
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
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Header & Footer text 2
PowerPoint Separate lines (line break) - PowerPoint Footer 1
How do I insert the name of a named range in a footer in Excel? 2
Excel Unique last page footer 1
Making a footer 2 lines 1
Make text in a cell appear in a footer 3
Custom Footer (Dynamic text with Static text) 1
Change Header/Footer w/ Worksheet Option Buttons 1

Back
Top