Ureader.com  
Microsoft software help and Community
   home   |   control panel login   |   archive   |  
 
Excel
123quattro
charting
crashesgpfs
datamap
excel
interopoledde
links
misc
newusers
printing
programming
querydao
sdk
setup
templates
worksheet.functions
  
 
date: Thu, 22 May 2008 07:31:01 -0700,    group: microsoft.public.excel.setup        back       


Can you set up a global footer (filename & ext) on all wsheets   
Is there a way to set a global footer for all workbooks to print the filename 
and extention at the bottom of the sheet without setting it for each workbook 
you have and for new ones opened?
date: Thu, 22 May 2008 07:31:01 -0700   author:   philinfla

Re: Can you set up a global footer (filename & ext) on all wsheets   
Open a new workbook.  Customize as you wish.  To set a footer for each sheet,
select a sheet then right-click and "select all sheets".

Enter your footer on the active sheet and will be done to all.  Ungroup sheets
when done.

File>Save As Type:  scroll down to Excel Template(*.XLT) and select.  Name your
workbook "BOOK"(no quotes). Excel will add the .XLT to save as BOOK.XLT. 

Store this workbook in the XLSTART folder usually located at........ 

C:\Documents and Settings\username\Application Data\Microsoft\Excel\XLSTART 

This will be the default workbook for File>New or the Toolbar button File>New or
CTRL + n

WARNING................Do not use File>New...Blank Workbook or you will get the
Excel default workbook.

NOTE:  Existing workbooks are not affected by these settings. 

You can also open a new workbook and delete all but one sheet.  Customize as 
you wish then save this as SHEET.XLT in XLSTART folder also.  It now becomes 
the default Insert>Sheet. 

More can be found on this in Help under "templates"(no quotes). 

Alternative for existing workbooks could be a macro.

Sub Path_All_Sheets()
    Set wkbktodo = ActiveWorkbook
    For Each ws In wkbktodo.Worksheets
        ws.PageSetup.RightFooter = ActiveWorkbook.FullName & " " & Chr(13) _
                & Application.UserName & " " & Date
    Next
End Sub

Edit to suit


Gord Dibben   Excel MVP 

On Thu, 22 May 2008 07:31:01 -0700, philinfla
 wrote:

>Is there a way to set a global footer for all workbooks to print the filename 
>and extention at the bottom of the sheet without setting it for each workbook 
>you have and for new ones opened?
date: Thu, 22 May 2008 08:58:45 -0700   author:   Gord Dibben gorddibbATshawDOTca

Google
 
Web ureader.com


    COPYRIGHT 2007, YARDI TECHNOLOGY LIMITED, ALL RIGHT RESERVE  |   contact us