Soru Kilitli hücrelerin kısmi seçimi

[burhancavus61]

Bu soruyu daha önce başka bir forumda sormuştum ama buradanda sormak istedim belki çözümü vardır.

Çalışma kitabındaki kilitli olan hücrelerin bir kısmını kilitli olmasına rağmen istisnai olarak seçilebilir hale getirebilirmiyiz.
Yani A1:B6 arası kilitli ama A1:A6 arası seçilmesin B1:B6 arası seçilsin ama işlem yapılmasın. Amaç hücreye dokunmak?

 

[Korhan Ayhan]

Merhaba,

Seçilsin ama işlem yapılamasın dediğinizde normal sayfa koruma yöntemi otomatikman devre dışı kalıyor. Eğer A1:A6 aralığı olmasaydı sayfa koruma yöntemi işinizi çözebilirdi.

Bu işlemdeki amacınızı belirtirseniz belki makro ile alternatif çözümler üretilebilir.

 

[burhancavus61]

Hocam kilitli olan hücre sütun aralığına mouse ile tıkladığımda bir makronun çalışmasını sağlamak istiyorum.
BC6:BC405 aralığı için geçerli

 

[Korhan Ayhan]

Ekteki örnek dosyayı deneyiniz.

 

[burhancavus61]

Teşekkür ederim hocam bunun üzerinden yürüyebilirim

 

[burhancavus61]

Hocam bu makroyu sağ kliğe bağlamayı düşünüyorum sağ klikte açılan menüyü sadece bu hücreler için kapatıp açabilirmiyim daha kullanışlı olur diye düşündüm. Kilitli çalışma kitabında sağ klik pek kullanmıyoruz.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)


    If Intersect(Target, Range("BC6:BC405")) Is Nothing Then GoTo son
        If MsgBox("Yangınla Mücadele Primi eklemek istiyormusunuz?", vbYesNo) = vbYes Then
        Sheets("Yan_Muc").Visible = True
        Sheets("Yan_Muc").Select
        End If
son:
    
    If Intersect(Target, Range("BA6:BA405")) Is Nothing Then Exit Sub

        If MsgBox("Karla Mücadele Primi eklemek istiyormusunuz?", vbYesNo) = vbYes Then
        Sheets("Kar_Muc").Visible = True
        Sheets("Kar_Muc").Select
        End If

End Sub

 

[Korhan Ayhan]

Herşeyi yapabilirsiniz..

 

[burhancavus61]

Tamam hocam çözdüm sağolun