I'm a complete Excel and VBA newbie and would like to know if it's
possible to change the output of OptionButtons from 'TRUE' or 'FALSE'
to "1"/"2"/"3"/etc..

The name of each button is:
Rating 1
Rating 2
Rating 3
Rating 4
and so forth..

The idea is for each rating to output its assigned number such that if
the user were to click "Rating 1", the result would be "1", "Rating 2"
= 2 and so on. I'm trying to design a survey and these results will
then be used to calculate an average rating.

Hope this makes sense,
Thanks.

If you are using an activeX control OptionButton I presume you have linked
the option button to your worksheet using the linkedcell. Firstly remove
this link. Then in the click event for each option button add

Private Sub OptionButton1_Click()
If OptionButton1 Then Sheets(1).Range("A1") = 1
End Sub

Private Sub OptionButton2_Click()
If OptionButton2 Then Sheets(1).Range("A1") = 2
End Sub

If you have multiple questions do not forget to use the GroupName to ensure
each set of option buttons for each question have a unique GroupName


--

Regards,
Nigel




"samela" wrote in message
...
I'm a complete Excel and VBA newbie and would like to know if it's
possible to change the output of OptionButtons from 'TRUE' or 'FALSE'
to "1"/"2"/"3"/etc..

The name of each button is:
Rating 1
Rating 2
Rating 3
Rating 4
and so forth..

The idea is for each rating to output its assigned number such that if
the user were to click "Rating 1", the result would be "1", "Rating 2"
= 2 and so on. I'm trying to design a survey and these results will
then be used to calculate an average rating.

Hope this makes sense,
Thanks.

On Jan 11, 3:20*pm, "Nigel" wrote:
If you are using an activeX control OptionButton I presume you have linked
the option button to your worksheet using the linkedcell. *Firstly remove
this link. *Then in the click event for each option button add

Private Sub OptionButton1_Click()
*If OptionButton1 Then Sheets(1).Range("A1") = 1
End Sub

Private Sub OptionButton2_Click()
*If OptionButton2 Then Sheets(1).Range("A1") = 2
End Sub

If you have multiple questions do not forget to use the GroupName to ensure
each set of option buttons for each question have a unique GroupName

--

Regards,
Nigel


"samela" wrote in message

...



I'm a complete Excel and VBA newbie and would like to know if it's
possible to change the output of OptionButtons from 'TRUE' or 'FALSE'
to "1"/"2"/"3"/etc..

The name of each button is:
Rating 1
Rating 2
Rating 3
Rating 4
and so forth..

The idea is for each rating to output its assigned number such that if
the user were to click "Rating 1", the result would be "1", "Rating 2"
= 2 and so on. I'm trying to design a survey and these results will
then be used to calculate an average rating.

Hope this makes sense,
Thanks.- Hide quoted text -

- Show quoted text -

Hey Nigel,

Thanks so much for that.

Is there any way that I can get the numbers to appear independently?
Say I'm doing this for a survey (designing a survey). And the user is
extremely fickle and may choose any of the options and then change
their mind and go back and change it again. Assuming that I'm this
user, I clicked "Rating 1" and the number 1 appeared.. But when I
clicked "Rating 2", the number 2 appeared as well meaning that I would
have problems tallying my results at the end as they do not stand
alone.

Does this make sense? I really hope it does!!
Thanks so much!!

I think that if you set up the options to write to the same worksheet cell
then if the user chooses another option then the latest choice (number) will
only be recorded. As I said in my last post it is important to group the
options for each question.

Say you have two questions with 2 options for each, then the GroupName for
the first question and associated option buttons could be set to Q1, the
second question and buttons GroupName would be Q2 etc.

For each GroupName only one of the option buttons can be selected, and the
corresponding recorded value will change to reflect that change, if
question 1 option buttons click event writes to worksheet - say A1, and
question 2 writes to A2. Then A1 and A2 would always show the latest user
click.

Hope this helps


--

Regards,
Nigel




"samela" wrote in message
...
On Jan 11, 3:20 pm, "Nigel" wrote:
If you are using an activeX control OptionButton I presume you have linked
the option button to your worksheet using the linkedcell. Firstly remove
this link. Then in the click event for each option button add

Private Sub OptionButton1_Click()
If OptionButton1 Then Sheets(1).Range("A1") = 1
End Sub

Private Sub OptionButton2_Click()
If OptionButton2 Then Sheets(1).Range("A1") = 2
End Sub

If you have multiple questions do not forget to use the GroupName to
ensure
each set of option buttons for each question have a unique GroupName

--

Regards,
Nigel


"samela" wrote in message

...



I'm a complete Excel and VBA newbie and would like to know if it's
possible to change the output of OptionButtons from 'TRUE' or 'FALSE'
to "1"/"2"/"3"/etc..

The name of each button is:
Rating 1
Rating 2
Rating 3
Rating 4
and so forth..

The idea is for each rating to output its assigned number such that if
the user were to click "Rating 1", the result would be "1", "Rating 2"
= 2 and so on. I'm trying to design a survey and these results will
then be used to calculate an average rating.

Hope this makes sense,
Thanks.- Hide quoted text -

- Show quoted text -

Hey Nigel,

Thanks so much for that.

Is there any way that I can get the numbers to appear independently?
Say I'm doing this for a survey (designing a survey). And the user is
extremely fickle and may choose any of the options and then change
their mind and go back and change it again. Assuming that I'm this
user, I clicked "Rating 1" and the number 1 appeared.. But when I
clicked "Rating 2", the number 2 appeared as well meaning that I would
have problems tallying my results at the end as they do not stand
alone.

Does this make sense? I really hope it does!!
Thanks so much!!