optionbutton toplu temizlik

[Barons]

merhabalar
2 problemim var.
1. userformda 48 adet optionbutton var.temizle butonu yaptım ve tek tek aşağıdaki kodla seçeneği siliyorum.Tek seferde döngü ile 1-48 adet optionbuttonu temizleme yani seçimi kaldırma imkanı varmı?
OptionButton1 = OptionButton1.Value = ""
.
.
2.bir frame içinde diyelim 4 adet optionbutton var ve bunlardan birisi seçilmek zorunda.aksi taktirde aşağıdaki kodla uyarıyorum.
If Frame3.ActiveControl Is Nothing Then
MsgBox "Ürün Tipi seçmelisiniz"
Exit Sub
End If
sorun şurada:yandaki kodla temizlediğimde (OptionButton1 = OptionButton1.Value = "")
msgbox uyarı vermiyor.userfomu kapatıp tekrar açmak gerekiyor.Bunuda çözemedim.

yardımcı olursanız çok sevinirim.

 

[dEdE]

Merhaba,
1. sorunuz için aşağıdaki kodu kullanabilirsiniz.

For x = 1 To 48
    Me.Controls("OptionButton" & x).Value = False
    Next

2. sorunuzu anlayamadım. Örnek dosya eklerseniz daha net yanıtlar verebiliriz.

Kolay gelsin.

 

[Barons]

çok teşekkürler.