Excel Footers

[Karen]

I use the same custom footer on all of my spreadsheets. How do I save it to
the preset footer list so that I don't have to re-enter it as custom on all
my spreadsheets?

 

[Gord Dibben]

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