Checkbox'da seçim kısıtlama

[seydune]

Merhaba. Elimde bir excel dosyası var. Bu dosyada bir çok soru var ve bu sorulara 1'den 5'e kadar bir değer ile yanıt veriliyor. Verilen bu değer, bir başka sayfada karşılık buluyor. Benim isteğim şu; çoklu seçimi devre dışı bırakıp var olan onay kutusundan sadece bir tanesini seçilebilir hale getirmek. Çoklu seçime izin vermemek. Radiobutton denedim ancak bu sefer de diğer sayfalarla olan bağlantılar bozuluyor. Yardımcı olan çıkarsa çok sevinirim.

 

[sakman26]

selam,
Option butonu kullanmalısınız..
Ekte verilen örneği inceleyiniz..
kolay gelsin..

link : http://s4.dosya.tc/server/mnr5d0/seydune_Test.xlsx.html

 

[seydune]

Cevabınız için teşekkür ederim. Bunun option butonsuz yapılabilmesi mümkün değil midir? Dediğiniz gibi yapmaya çalıştım ancak, bağlantılarım problem çıkarıyor. Düzeltmeye çalıştığım dosya ektedir.
Link: http://s2.dosya.tc/server/yaz400/seydune_degerlendirme.xlsx.html

 

[PLİNT]

Merhaba
Aşağıdaki makroyu tüm kutulara atayarak deneyin
Örnek dosyada birkaç sıradakilere eklendi

http://s2.dosya.tc/server/6escdn/seydune_degerlendirme.zip.html

Sub tr()
Dim x As Shape
Dim m As String
Dim m3 As Long
m = Application.Caller
m3 = ActiveSheet.Shapes(m).TopLeftCell.Row
For Each x In ActiveSheet.Shapes
If Not Intersect(x.TopLeftCell, Range("E" & m3 & ":I" & m3)) Is Nothing Then
If x.Name <> ActiveSheet.Shapes(m).Name Then x.ControlFormat.Value = False
End If
Next x
End Sub

 

[sakman26]

selam,
Option butonları kullanılarak hazırlanan dosyanız ektedir.
kolay gelsin..

link : http://s2.dosya.tc/server/mszkku/seydune.rar.html