Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I need to use a calculation in a footer as an "additonal" page reference (the
sheet forms part of another document). I cannot reset the page number as I need to use standard numbering in the document too. In full I need the following in a footer: Page x of y (standard option) Page (x+10) of (y+10) of document H1234 Hope this makes sense! |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
a macro could do that.You would have to do the calculation eithr on the shet
or within the macro then paste it into the text part of the footer.I dont know the code but if you record a macro whie you edit the footer you will get an idea Sub Macro1() ' ' Macro1 Macro ' Macro recorded 28/07/2006 by ............ ' With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "a custom footer" & Chr(10) & "&P&N&Z&F&F" .RightFooter = "" End With end Sub the idea of pasting a worksheet formula result didnt work,but maybe a vba variable might Hope this is of some help -- paul remove nospam for email addy! "John Mc Twang" wrote: I need to use a calculation in a footer as an "additonal" page reference (the sheet forms part of another document). I cannot reset the page number as I need to use standard numbering in the document too. In full I need the following in a footer: Page x of y (standard option) Page (x+10) of (y+10) of document H1234 Hope this makes sense! |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
this worked
Sub Macro1() ' ' Macro1 Macro ' Macro recorded 28/07/2006 by Shepherd ' myfooter = 8 With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = myfooter .RightFooter = "" End With End Sub ie the footer was 8 -- paul remove nospam for email addy! "John Mc Twang" wrote: I need to use a calculation in a footer as an "additonal" page reference (the sheet forms part of another document). I cannot reset the page number as I need to use standard numbering in the document too. In full I need the following in a footer: Page x of y (standard option) Page (x+10) of (y+10) of document H1234 Hope this makes sense! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Open CSV causes calculation in manual calc mode | Excel Discussion (Misc queries) | |||
Custom Footer for each page | Excel Worksheet Functions | |||
Calculation Setting in Excel | Excel Discussion (Misc queries) | |||
How do I use a rounded calculation result in another calculation? | Excel Worksheet Functions | |||
How do I use a rounded calculation result in another calculation? | Excel Worksheet Functions |