Left Footer Error

A

Annette

I have a macro in my workbooks that is set up to automatically update the
page footer with the full path of the file name. This macro use to work
without fail but I have been receiving errors lately when I run the macro. I
can't figure out what is wrong. This is the macro I am using:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
End Sub

My first error is related to the left page footer and then when I cancel out
of the debug I get a memory error and I am booted out of Excel.

Any help would be appreciated.

AJB
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Macro Loop 0
Working outlook via vba code with xlsx - error 0
Need VBA Macro to Loop through pages and print counter in footer of each page 9
Making a macro only work on certain files 2
VBA word change keys 0
Protected word template - vb/macro to update footer 7
VSTO C# add in Outlook.Appointment error 0
Footer height is different between sections 2

Top