Programmatically add "worksheet activate" event

**js8765** · 03-05-2010, 10:22 AM

Hi there,

Is there any way to add a "worksheet activate" event to a sheet by using VBA code?

I have a macro in which I create a new sheet and want to add a "worksheet activate" event to it.

Thanks in advance for any help!

js

**romperstomper** · 03-05-2010, 10:37 AM

Is the event code the same for each sheet that you add?

**Domski** · 03-05-2010, 10:38 AM

This is probably worth a look: http://www.cpearson.com/excel/vbe.aspx

Dom

**js8765** · 03-05-2010, 10:42 AM

Hi again,

Well...the event code will be the same for each sheet I create using the sub.

Basically the sub has to add one sheet and then add the event code just to that sheet...

Cheers,

js

**romperstomper** · 03-05-2010, 10:49 AM

If you use the Workbook_SheetActivate event instead it will fire for all sheets in the workbook but you can tell it not to do anything if the sheet has a particular name. That means that you wouldn't need to add any code to the sheets as you create them - the event will work for them automatically.

**js8765** · 03-05-2010, 10:55 AM

OK.

Thank you both for the ideas. I found some code that should do the trick in the link Dom sent under the section "Adding A Procedure To A Module"

Cheers,

js