Get and pass name of clicked ActiveX check box

BobBridges · #5 06-02-2014, 08:09 AM

Quote:

Originally Posted by Bob Bridges

I think I'd try passing the checkbox object itself.

Quote:

Originally Posted by NobodysPerfect

If that means

Code:

Private Sub CB1a_Click
  Call DoWithBox "CB1a"...

Nope, that's just another way of trying to pass the name of the checkbox. I think this would work:

Code:

Private Sub CB1a_Click
  DoWithBox CB1a
  .
  .
  .

Then in DoWithBox something like

Code:

Sub DoWithBox(cb)
  Select Case cb.Name
    Case "CB1a": 'do whatever
    Case "CB1b": 'do something else
    Case "CB2a": 'and so on
    End Select
  .
  .
  .

I'm not saying that's the way I'd solve the original problem; but if I'd already decided to try to work based on the object name, then this is probably how I'd go about doing that.

Is there a way for a control in the form to refer to itself? I think "Me" refers to the whole form, but maybe some object named "ThisControl" or something? Might simplify coding.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to Pass Document to this Sub	ilcaa72	Word VBA	1	01-28-2014 03:04 PM
Can pass .expression as a parameter?	tinfanide	PowerPoint	4	12-28-2012 06:14 PM
How to pass parameters to a .msg file?	HereNow	Outlook	0	11-05-2012 10:38 AM
Office 2010 Excel Full pass	raineraus	Excel	1	09-19-2012 12:55 PM
How do I Convert All Legacy Check Boxes to ActiveX?	GreenPolyps	Word	1	12-20-2011 05:11 PM