can I make a general object event procedure?

[Guest]

Is there a way to make event procedures generic? For example, if I create
and populate a list or combo box via code, can I pass the address of the
created box to a _change() procedure?

wazooli

 

[Tom Ogilvy]

Not generally. You can make an create a class and assign that class to
multiple objects, then define you events in that class.

See John Walkenbach's site for an example.
http://j-walk.com/ss/excel/tips/tip44.htm
Handle Multiple UserForm Buttons With One Subroutine

Written for a userform and commandbuttons, the approach will work for any
activeX control and can be for a userform or a worksheet.

 

[Guest]

Yeah - he talks about it in his book. I will muck about with this. Don't be
surprised if i am back here tomorrow with questions.

 

[NickHK]

Wazooli,
Not sure if this is what you mean, but you can pass the object (or rather a
pointer to it ?) to a sub/function.

Private Function a_change(MyObject as Object) as long
'Decide what to do based on the type of object
If MyObject Is ComboBox Then.....


You could call this from any objects' event procedure
RetVal=a_change(ThisObject)

NickHk