Format footer
Thank you!
"Bob Phillips" wrote:
With ActiveSheet.PageSetup
ActiveSheet.PageSetup.RightFooter = _
Worksheets("Detail").Range("A4").Text
End With
--
HTH
Bob Phillips
(there's no email, no snail mail, but somewhere should be gmail in my addy)
"MacroLearning" wrote in message
...
This is the code I'm working with. Cell A4 will contain text (cells
formatted to text), January 2007 for example. I'd like that to appear on
the
footer. It inserts it but formats it as 1/1/2007. I'd like it to just
have
the whole month and year. Thanks
With ActiveSheet.PageSetup
ActiveSheet.PageSetup.RightFooter = _
Format(Worksheets("Detail").Range("A4").Value).Tex t
End With
|