Şartlı Hücre Saklama

[ayn_tanır]

merhabalar,
ekte bulunan dosya için sayfa2'de Tür maliyet butonunun sadece c ve d verilerini seçtiğimde karşıma gelmesini (görünmesini) istiyorum makro ile nasıl yapabilirim,teşekkürler

 

[hamitcan]

Açılan Kutuyu Makro1'e bağlayın.

Sub Makro1()
    ActiveSheet.Shapes("Açılan 1").Select
    If Sheets("Sayfa1").Cells(Selection.Value + 2, 2) = "c" Or _
       Sheets("Sayfa1").Cells(Selection.Value + 2, 2) = "d" Then
       [b5] = "tür"
       Sayfa1.OptionButton2.Visible = True
    Else
        [b5] = ""
        Sayfa1.OptionButton2.Visible = False
    End If
        [a1].Select
End Sub