I just saw the note about adding a picture. Here is the code for that:

Sub addFooter
Dim ws As Worksheet

ActiveSheet.PageSetup.CenterFooterPicture.Filename = _
"File path and name here"
For Each ws In Worksheets
ws.PageSetup.CenterFooter = "&G"
Next

End Sub
--
Regards,

PJ
Please rate this post using the vote buttons if it was helpful.



"Deb" wrote:

Everytime I select each tab and insert a picture for a footer, it messes up
the headers that are already established. Any suggestions?