Using option button properties

[bujaman]

I am trying to get the code to hook together the caption property values for the various combo boxes selected and display the string of text in a cell. I have gotten it to get the first optionbutton caption value and put it where I want it (Thanks to xld's help), but I have multiple groups of optionbuttons and can't figure out how to get it to read the subsequent optionbuttons. I have attached the file so you can see it. Thanks for your help.

[p45cal]

The following code is only an adaptation of a snippet of your own without the 'Exit For' line to allow it to run through ALL the option buttons on the form. I've not taken the time to look into this in any depth:
[vba]summat = ""
For Each ctl In Me.Controls
If TypeName(ctl) = "OptionButton" Then
If ctl.Value Then summat = summat & "|" & ctl.Caption
End If
Next ctl[/vba]After this has run, 'summat' contains the likes of
"|Wells Fargo|Transfer|Checking"
I know it may not be in the right order vis-a-vis the user form, but you can further manipulate the text to your heart's content.

[bujaman]

Thanks for that code, I got it to work, but I can't rearrange the order of how it pulls the Caption value, any tips on how to get it to be in this order: Transfer|Wells Fargo|Checking? Thanks again.

[p45cal]

but you can further manipulate the text to your heart's content

tack this snippet on:
[vba]summatelse = Split(summat, "|")
summat = summatelse(1) & "|" & summatelse(3) & "|" & summatelse(2)
[/vba]The order is determined by the
For Each ctl In Me.Controls
line, which probably goes through them in the order they were added to the form.

[bujaman]

Where should I put that code? I can't get it to work. Thanks for your help, I really appreciate it.

[p45cal]

straight after the snippet in message #2

Oops, I assumed left to right as on the form, so change
[VBA]summat = summatelse(1) & "|" & summatelse(3) & "|" & summatelse(2)[/VBA]
to
[VBA] summat = summatelse(2) & "|" & summatelse(1) & "|" & summatelse(3)[/VBA]

[bujaman]

Thanks for your help, it is working great.