Adding a cell reference to a footer?


M

mercil

Have created a worksheet in which the user fills out info and it carries over
into the other tabs. Is there a way to have one of the cells in the first
worksheet referenced as part of the footer for all of the corresponding tabs?
 
Ad

Advertisements

G

Gord Dibben

Sub Cell_In_AllFooters()
Dim WS As Worksheet
For Each WS In ActiveWorkbook.Sheets
WS.PageSetup.CenterFooter = Sheets("Sheet1").Range("A2").Value
Next
End Sub


Gord Dibben MS Excel MVP
 

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

Top