With ThisWorkbook.Worksheets("Robert")
.PageSetUp.LeftFooter = .Range("A1").Value
End With
--
Jim Cone
Portland, Oregon USA http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)
"Robert O'Neill"
<Robert O'(e-mail address removed)>
wrote in message
Is there a way to link a value in a footer to a cell of a spreadsheet.