How to share header code w/ office

**larampj** · 04-06-2011, 10:18 AM

I have been using a BeforePrint command to put a header/footer on all my workbooks. I would like everyone in the office to use this and would like to make it as user friendly as possible. I currently a+F11 and paste it into new docs. I'd like to be able to assign a shortcut to it, but I am not sure how to alter it so that
a) it will work with a shortcut and
b) so that it can be easily shared with other users.

The code i pieced together:

Please Login or Register  to view this content.

Thanks in advance.

**jwright650** · 04-06-2011, 10:27 AM

Welcome to the forum.
Just a quick note, the forum rules require [ code] your code[/code]....type of tags around your code when you post it in the forum.
....just letting you know because the mods are pretty strict about the rules.

**romperstomper** · 04-06-2011, 10:29 AM

I added them as it's the OP's first post.

**romperstomper** · 04-06-2011, 10:31 AM

You will need an addin with an Application variable declared WithEvents so that you can trap the BeforePrint event of any workbook without having to copy the code into all of them.

**romperstomper** · 04-06-2011, 10:37 AM

See attached.

**larampj** · 04-06-2011, 10:48 AM

Thanks for the quick response and will post code properly next go.
Can you educate me very briefly in high level laymans terms as to the difference between using the add-in vs the macro approach?

**romperstomper** · 04-06-2011, 10:55 AM

Your macro has to be put into every workbook that you want it to work for. The add-in version monitors the application waiting for any workbook to be printed and then automatically sets its headers as specified.