Listening to the UserForm_Activate event using WithEvents in a Class Module.

[Jaafar Tribak]

Hi,

Say for example, you have a couple of modeless userforms on display and you want to run some small macro each time you activate each userform.

The obvious answer is simply placing the small macro (or a call to it) in each of the UserForm_Activate event handlers.

But what If you wanted to have a common event handler in a class module that runs the common code (similar to what we do with form controls) ?

If you try using Private WithEvents uFormEVents As UserForm, you will find that the Actiavate\Deactivate events are not exposed by the class.

Yes. I have come up with some workarounds like subclassing the userforms ( and catching the WM_NCACTIVATE ) or using a windows timer to detect when the userforms are being activated but I am trying to avoid such approaches as they are both risky and have a heavy performance hit. I am looking for a more OOP oriented approach.

Does anyone have any suggestions ?

The subject of this recent thread is what prompted me to post this question.

 

[Jaafar Tribak]

If it was yours, do you think that other account could that have had an email address with a UK domain?

I was livng in the UK at the time and that's where and when I learned the little English I know. ?

 

[Peter_SSs]

I was livng in the UK at the time and that's where and when I learned the little English I know. ?

OK, thanks Jaafar. I think I will remove that old account since nothing ever happened with it.

 

[Jaafar Tribak]

For anyone looking to group userforms together, here is this new thread where I posted a much better rmethod :

Grouping UserForms [Having userforms follow each other when moved around the screen]

Hi, This is a vba code that hopefully accomplishes what the title of the thread says. Obviously, the forms must be modeless so that the user can freely move from one form to aanother. Problem is, using modeless forms makes this task difficult as we cannot subclass modeless forms to properly...

www.mrexcel.com