Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I've written the following macro (this is the operative part of it) to insert
the file name AND path into the left footer of my Excel 2000 spreadsheet: With ActiveSheet.PageSetup .LeftFooter = ActiveWorkbook.Path .LeftFooter = ActiveWorkbook.FullName End With The macro works fine. HOWEVER, I want to change the point size of the font from "normal" to .08. I've tried entering a line code of "&08", but it doesn't work, as this is intended to change text. Since the macro is entering a formula, the "&08" doesn't work. Any solution? Thank you in advance. |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
With ActiveSheet.PageSetup
.LeftFooter = "&8" & ActiveWorkbook.FullName End With -- Regards, Tom Ogilvy "Alan Tolkoff" wrote in message ... I've written the following macro (this is the operative part of it) to insert the file name AND path into the left footer of my Excel 2000 spreadsheet: With ActiveSheet.PageSetup .LeftFooter = ActiveWorkbook.Path .LeftFooter = ActiveWorkbook.FullName End With The macro works fine. HOWEVER, I want to change the point size of the font from "normal" to .08. I've tried entering a line code of "&08", but it doesn't work, as this is intended to change text. Since the macro is entering a formula, the "&08" doesn't work. Any solution? Thank you in advance. |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thank you!
@ "Tom Ogilvy" wrote: With ActiveSheet.PageSetup .LeftFooter = "&8" & ActiveWorkbook.FullName End With -- Regards, Tom Ogilvy "Alan Tolkoff" wrote in message ... I've written the following macro (this is the operative part of it) to insert the file name AND path into the left footer of my Excel 2000 spreadsheet: With ActiveSheet.PageSetup .LeftFooter = ActiveWorkbook.Path .LeftFooter = ActiveWorkbook.FullName End With The macro works fine. HOWEVER, I want to change the point size of the font from "normal" to .08. I've tried entering a line code of "&08", but it doesn't work, as this is intended to change text. Since the macro is entering a formula, the "&08" doesn't work. Any solution? Thank you in advance. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
don't want to have to change font in header and footer each time? | Excel Worksheet Functions | |||
Macro to Change Footer on all worksheets | Excel Discussion (Misc queries) | |||
macro that will change the font of a cell if i change a value | Excel Discussion (Misc queries) | |||
Add Font to Header/Footer macro | Excel Discussion (Misc queries) | |||
how you change font colour in header/footer? | Excel Discussion (Misc queries) |