Option button in a frame return different value

Hello,

I am working on a time management form project. I have created a form with a frame that contains 3 option buttons (I am a beginner in VBA)
the user has the choice between the first button corresponding to full time, the second to part-time weekly reduction, and the last to part-time daily reduction.

Depending on the selected button, I want the value returned in an Excel sheet to be TP for full time, Redh for weekly reduction, and Redj for daily reduction (which is different from the caption value of each button recorded initially).

At first, my code looked like this

Private Sub Commandbutton1_Click() temp = "" For Each c In Me.Frame1.Controls If c.Value = True Then temp = c.Caption End If Next c Sheets("Effectifs").Cells(Ligne, 7) = temp End Sub

which works very well, but the returned values are: Full time (instead of TP), weekly reduction (instead of Redh)...

After searching a bit, I understood that I needed to incorporate the following lines

 Private Sub Frame1_Click() If OptionButton1.Value = True Then temp = "TP" If OptionButton2.Value = True Then temp = "Redh" If OptionButton3.Value = True Then temp = "RedJ" End If End Sub

but I have no idea where to put them, and it doesn't work :(

I am sure I am almost there, but I need a little help please.

Thank you very much

Configuration: Windows / Internet Explorer 11.0