AccessTr.neT
Formül Yardımı - 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ığı: Formül Yardımı (/konu-formul-yardimi.html)



Formül Yardımı - kursad05 - 09/01/2010

Arkadaşlar, çalıştığım milli eğitim müdürlüğünün istatistik verileri için bir program hazırlıyorum. Son haliyle programı ekte sundum ancak



resimde personel bilgilerini girerken mesela ünvanını Müdür olarak setiğimde aşağıdaki istatistik bölümünde Ünvanı Bölümündeki Müdür Onay kutusunun otomatik olarak seçilmesi için bir formül yazmak istedim başaramadım. Yani Ünvanı bölümüne ne seçerse aşağıdaki istatistik bölümünde yer alan ilgili kutunun otomatik olarak seçili olabilmesi için bir formül lazım. Bilgisi olan arkadaşlar yardımcı olabilirler mi bana? Şimdiden Teşekkür ederim ilgilenen herkese...
.rar İstatistik.rar (Dosya Boyutu: 163,85 KB | İndirme Sayısı: 15)



Cvp: Formül Yardımı - ercansahin - 09/01/2010

Lütfen deneyin..

Kod:
Private Sub Form_Current()
If Me.Ünvanı = "Müdür" Then
Me.Müdür_Onay.Value = "-1"
Else
Me.Müdür_Onay.Value = "0"
End If

Private Sub Ünvanı_AfterUpdate()
If Me.Ünvanı = "Müdür" Then
Me.Müdür_Onay.Value = "-1"
Else
Me.Müdür_Onay.Value = "0"
End If
End Sub

Diğerleri için siz düzenlemelisiniz...Ben sadece Müdür'e yönelik düzenledim. Saygılarımla


Cvp: Formül Yardımı - kursad05 - 09/01/2010

İlk başta hata verdi. En altta ki tane end sub vardı. Onlardan birini Private Sub Ünvanı_AfterUpdate() ifadesinin üzerine taşıdığım zaman çalıştı. Gayetde güzel oldu. Sağolasın hocam. Ellerin yüreğin ve beynin dert görmesin.


Cvp: Formül Yardımı - ercansahin - 09/01/2010

Siz sağolun. Kolay gelsin. Saygılarımla