Açılan Kutu Seçimine göre diğer açılan kutuları kilitlemek

27/08/2011, 09:56

iscinar

Daha önce açmış olduğum konuyla bağlantılı olarak seçime göre göster gizle yapmış olduğumuz açılan kutulardan bir kısmını (Seçilecek rapora göre 1, 2, 3 veya dilediğimiz kadarını ) kilitleyebilirmiyiz?

Örneğin:
Personel Raporlarından Kan Grubunu seçtiğimizde Personel Kriter içindeki Kan Grubu enable diğer açılır kutular disable olsun veya Adres Raporunu seçtiğimde İl, İlçe ve mahalle enable diğerleri disable olsun gibi.

Not: Eklediğim örnek daha önce açılmış ve yarım kalmış bir konu üzerine fikir anlamında doğmuş, linkini eklediğim konu ile şu anki halini almıştır. Örnek olduğu için Açılan kutuların hangi raporda hangisinin kilitlendiğinin önemi yoktur. Öğrenmek istediğim bu örneği çalıştığım projeme eklerken izleyeceğim yoldur.

İlgilenecek herkese şimdiden teşekkür ediyorum
27/08/2011, 10:47

ozanakkaya

Örnek kod aşağıda, "RaporCins" açılan kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu yaz.
Çalıştırdığında false yazılı açılan kutular kilitlenir, diğer kriterlere ve gizlenecek kutulara göre kodu düzenlemeniz gerekiyor.
Private Sub RaporCins_AfterUpdate()
Select Case Me.RaporCins.Column(1)
Case "Kan Grubu"
isim.Enabled = False
kangrubu.Enabled = False
ili.Enabled = False
Case "Personel Adres"
isim.Enabled = True
kangrubu.Enabled = True
ili.Enabled = False
Case "Personel Raporu"
isim.Enabled = True
kangrubu.Enabled = False
ili.Enabled = True
Case Else
isim.Enabled = True
kangrubu.Enabled = True
ili.Enabled = True
End Select
End Sub
27/08/2011, 11:04

iscinar

Teşekkürler Sn. sledgeab
Kodları uyguladım sorun yok istediğim rapora istediğim kutuları bağlayıp tekrar geri dönüş yapacağım.
27/08/2011, 12:44

iscinar

Sn. sledgeab
İşlem tamam gayet güzel çaılşıyor. Kodları ekledim Araç raporları için örnekleme yaptım ilk açılışta tümünü False yaptığım halde Kod bloğunun en başındaki şekilde geliyor (Araçlar için "Zimmet Raporu" Personel için "Personel Raporu" kodları ile açılıyor) gerçi çalışmada problem yok ama acaba bir yerde hata mı yaptım diye düşünüyorum.

Örnek 1. mesajda güncellenmiştir.
27/08/2011, 13:54

ozanakkaya

Formu tasarım görünümünde aç, tüm açılan kutuların Etkin Özelliğine Evet, Kilitli özelliğine Hayır olarak değiştirip formu kapat, tekrar açtığında pasif kutu olmaz.
27/08/2011, 15:21

iscinar

Çok teşekkür ediyorum Sn. sledgeab