AccessTr.neT
Seçime Göre Alt Form Gösterme / Gizleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Seçime Göre Alt Form Gösterme / Gizleme (/konu-secime-gore-alt-form-gosterme-gizleme.html)



Seçime Göre Alt Form Gösterme / Gizleme - derzulya - 10/03/2020

Ekteki uygulamada Talepler formunun içerisine alt formları ekledim ve açılışta olayına gizlenmesi kodunu yazdım. çünkü form açıldığında görünmesini istemiyorum.

Kod:
Private Sub Form_Open(Cancel As Integer)
Me.satinalma.Visible = False
Me.fatura_islemleri.Visible = False

End Sub

ardından Birim adlı açılır kutudaki seçime göre açılmasını istedim. bunun içinde şöyle bir kod kullandım.

End Sub


Kod:
Private Sub birim_AfterUpdate()
Me.talep_birimi.Requery

If Me.birim.Value = "Satın Alma" Then Me.satinalma.Visible = True
If Me.birim.Value = "Muhasebe" Then Me.fatura_islemleri.Visible = True

End Sub


fakat hiç bir şekilde görünmesini sağlayamadım. hatayı nerede yaptım? yardımcı olabilir misiniz.


Cvp: Seçime Göre Alt Form Gösterme / Gizleme - berduş - 10/03/2020

çalışmamasının sebebi açılır kutu ilk sütunla (0. sütun) ilişkili ama karşılaştırma 2. sütunla (1. sütun) yapılıyor dolayısıyla sonuç hatalı çıkıyor. kodu aşağıdaki gibi düzenlemeniz daha doğru olur
If Me.birim.Column(1) = "Satın Alma" Then Me.satinalma.Visible = True Else Me.satinalma.Visible = False
If Me.birim.Column(1) = "Muhasebe" Then Me.fatura_islemleri.Visible = True Else Me.fatura_islemleri.Visible = False



Cvp: Seçime Göre Alt Form Gösterme / Gizleme - berduş - 10/03/2020

Else Me.satinalma.Visible = False eklemezseniz bir defa göründükten sonra hep görünür kalır bir şekilde onu tekrar görünmez yapmanız gerek


Cvp: Seçime Göre Alt Form Gösterme / Gizleme - derzulya - 10/03/2020

Teşekkür ederim.