Soru User Form'daki Check Boxları nasıl içlerinde dolanabilirim degerlerine göre işlem yapmak istiyorum

[clleker88]

 

[ÖmerBey]

Merhaba,
Resim yerine dosya ekleseniz daha iyi olurdu...
Aşağıdaki kodları inceleyiniz.

Private Sub CommandButton1_Click()
For a = 1 To 6
    If Controls("OptionButton" & a) Then
        deger = Controls("OptionButton" & a).Caption
        Exit For
    End If
Next
MsgBox deger & " seçeneğini seçtiniz"
End Sub