List names of selected checkboxes in UserForm as string

**rockyourteeth** · 09-27-2012, 05:12 PM

Noob question from a first-time poster:

Okay, so basically I have a macro that is doing a bunch of stuff, but I'll just give you the pertinent information. I have a UserForm with a bunch of checkboxes, and I basically want it to spit out a string with a list of all of the checkbox names of all the checked boxes. And then I'll use that string elsewhere in a Range(...).Select command.

This is as far as I've gotten...

Please Login or Register  to view this content.

So it's checking each box and returning the Name as the variable "Selected Columns", but how can I get that to list it out so that each of those names goes into another section like this...

Please Login or Register  to view this content.

...where C1, D1, etc. will be replaced with the names of each checkbox.

Let me know if that makes sense, or if I need to add more information. Thanks! (Excel 2010)

**tlafferty** · 09-27-2012, 05:23 PM

try changing this line: SelectedColumns = ctrl.Name
to this: SelectedColumns = SelectedColumns & ctrl.Name

UNTESTED.....

**rockyourteeth** · 09-27-2012, 05:41 PM

Unfortunately, that gave an error. That's where I'm establishing the variable, so I think it needs to be "=". But I took your idea and tried...

Please Login or Register  to view this content.

...which unfortunately also didn't work, it just listed each one on the msgbox twice. I need it to list each one in the same list at the same time. I'm sure it's some simple little syntax thing I'm missing...

**tlafferty** · 09-27-2012, 07:04 PM

Here's the basic concept:
On the first pass through the control set, it should grab the current control name if it's value = TRUE. It should then take the variable SelectedColumns which should be empty and append an empty string (which is the current value of SelectedColumns before adding anything to it). To that empty string it should add the control name, so your variable should hold ""FirstFoundControlName. On the second pass through it should look like FirstFoundControlNameSecondFoundControlName. You'll need to add commas to separate each control name.

SelectedColumns = SelectedColumns & "," & ctrl.Name

Hope that helps...