If Then with Radio Buttons

[msgb1080]

I am attempting to code an If Then statement when choosing between 3 radio buttons.

This is the code I have in now. Once I get the If Then statement to work I will put the rest of the code in. But as of right now it gives me the following error:

"Compile Error:

Type Mismatch"


Private Sub CommandButton1_Click()
If optSML.Value Is True Then
MsgBox "This will put the SML sizes in"
Else
If optXSXL.Value Is True Then
MsgBox "This will put the XS-XL sizes in"
Else
If opt3242.Value Is True Then
MsgBox "This will put the 32-42 sizes in"
Else
MsgBox "You must choose 1 Pre-Made option or use the Custom tab to select your sizes."
End If
End Sub


Any suggestions? What am I doing wrong?

 

[Jerry Sullivan]

This part is causing the error...
If optSML.Value Is True Then

For Properties, use the = operator. For example...
If optSML.Value = True Then
or better yet to test if the OptionBox's value = True you can just write
If optSML Then

Your Procedure can be simplified to...

Private Sub CommandButton1_Click()
    If optSML Then
        MsgBox "This will put the SML sizes in"
    ElseIf optXSXL Then MsgBox "This will put the XS-XL sizes in"
    ElseIf opt3242 Then MsgBox "This will put the 32-42 sizes in"
    Else: MsgBox "You must choose 1 Pre-Made option or use the Custom tab to select your sizes."
    End If
End Sub