recorded macro for pagesetup producing error

here is the ultimate goal:

having a command button in the toolbar that when pressed will format the open worksheet.

everything works perfectly fine except for the page setup.

I have attached two files for you:

formatter - copy.xls - you will need to change this extension to .xla, I had to change it so I could upload it. I would like this to be used as an add-in, with a button in the toolbar to run the code.

the other file is the unformatted document

User would open the unformatted document, press the button and all the changes would take place. Finally saving the formatted document to the same folder.


I appreciate the help!