Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Footers
Hey,
I need to have Printed By:________ 06Aug04 on the same line in the RightFooter. Sub Dates() ActiveSheet.PageSetup.RightFooter = "Printed By:_______" ActiveSheet.PageSetup.RightFooter = Format(Now, "dd mmm yy") End Sub No matter how I have tried to break this up different ways it will either give me the Printed By or the date but not both. Any and all help would be appreciated. Thanks, Charmaine |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Footers
Charmaine,
Try: ActiveSheet.PageSetup.RightFooter = "Printed By:_______" & " " & Format(Now, "dd mmm yy") NOTE: The above must all be written as one line of code in your module. "Charmaine" wrote: Hey, I need to have Printed By:________ 06Aug04 on the same line in the RightFooter. Sub Dates() ActiveSheet.PageSetup.RightFooter = "Printed By:_______" ActiveSheet.PageSetup.RightFooter = End Sub No matter how I have tried to break this up different ways it will either give me the Printed By or the date but not both. Any and all help would be appreciated. Thanks, Charmaine |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Footers
quartz,
Thank you for your help. The funny thing is that at one point I did try putting in "and" but never thought of using & instead. Again thank you this was a big help!!! Charmaine -----Original Message----- Charmaine, Try: ActiveSheet.PageSetup.RightFooter = "Printed By:_______" & " " & Format(Now, "dd mmm yy") NOTE: The above must all be written as one line of code in your module. "Charmaine" wrote: Hey, I need to have Printed By:________ 06Aug04 on the same line in the RightFooter. Sub Dates() ActiveSheet.PageSetup.RightFooter = "Printed By:_______" ActiveSheet.PageSetup.RightFooter = End Sub No matter how I have tried to break this up different ways it will either give me the Printed By or the date but not both. Any and all help would be appreciated. Thanks, Charmaine . |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom Footers
No problem Charmaine,
I've been there believe me, and these kinds of things that make you crazy. Glad I could help. "Charmaine" wrote: quartz, Thank you for your help. The funny thing is that at one point I did try putting in "and" but never thought of using & instead. Again thank you this was a big help!!! Charmaine -----Original Message----- Charmaine, Try: ActiveSheet.PageSetup.RightFooter = "Printed By:_______" & " " & Format(Now, "dd mmm yy") NOTE: The above must all be written as one line of code in your module. "Charmaine" wrote: Hey, I need to have Printed By:________ 06Aug04 on the same line in the RightFooter. Sub Dates() ActiveSheet.PageSetup.RightFooter = "Printed By:_______" ActiveSheet.PageSetup.RightFooter = End Sub No matter how I have tried to break this up different ways it will either give me the Printed By or the date but not both. Any and all help would be appreciated. Thanks, Charmaine . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Custom Headers and Footers | Excel Worksheet Functions | |||
Custom Footers | Excel Discussion (Misc queries) | |||
Custom Footers | Excel Discussion (Misc queries) | |||
Custom Footers. | Excel Discussion (Misc queries) | |||
custom footers in Excel 97 | Excel Discussion (Misc queries) |