improving userform

[lezawang]

Hi
I have a userform which has a label as a question and 3 radios buttons as an answer. The form is this

http://tinypic.com/r/6gaj2q/9

http://i65.tinypic.com/6gaj2q.jpg

When use click on Math button, math cell value will be incremented by 1. Everything is working fine if a user will click on Math then Excel or History etc but nothing would happen if a user click on Math twice for example. How would you fix/improve this code. Thank you so much

Private Sub Excel_Click()
Cells(2, 1) = Cells(2, 1) + 1
End Sub


Private Sub history_Click()
Cells(2, 3) = Cells(2, 3) + 1
End Sub


Private Sub Math_Click()
Cells(2, 2) = Cells(2, 2) + 1
End Sub

 

[Logit]

.

Private Sub Excel_Click()
If Excel_Click = True then
	Exit sub
Else
	Cells(2, 1) = Cells(2, 1) + 1
end if
End Sub




Private Sub history_Click()
If history_Click = true then
	Exit Sub
else
	Cells(2, 3) = Cells(2, 3) + 1
end if
End Sub




Private Sub Math_Click()
If Math_Click = True then
	Exit Sub
Else
	Cells(2, 2) = Cells(2, 2) + 1
End If
End Sub

 

[lezawang]

Thank you for your help. I got compiler error. Is it Excel_Click= true or Excel.value=True?

 

[Logit]

.
Sorry ... Excel_Click.Value = True