You don't.
Couple of ways to go.
Use a macro to set the footers on all sheets of a workbook.
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
Store in your Personal.xls so's it's available for all open workbooks.
Second method............................
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).
Gord Dibben MS Excel MVP
