29/12/2009, 07:11
Acceste formül hesaplatmanın basit yöntemi
1 2
29/12/2009, 11:30
yasinunal
Sayın Benremix daha öncede söylediğim gibi veritabanımın büyük kısmı hesaplamalara dayandığı için bunu yapamıyorum. Fakat sayın Alpeki dediğinizi deneyeceğim.
Birde Örneğin Alan1=Alan2+Alan3 ve Alan2=Alan4+Alan5 ise Alan4'e yeni değer girdiğimde Alan1'in tekrar hesaplatılması için Alan2'nin "değiştiğinde" olay yordamına Alan1'i tekrar hesaplatamaz mıyız? Açıkçası ben bunu denedim. Alan4'e yeni değer giriyorum.Alan2 formülü devreye girip hesaplamayı yapıyor ve sonuç değişiyor. Fakat Alan2 değişmesine rağmen olay yordamı devreye girip Alan1'i hesaplanmıyor. Acaba bir hatamı yaptım yada "değiştiğinde" olay yordamı benim planladığım işi yapmıyor mu? Bu konuda yardımcı olursanız sevinirim.
Birde Örneğin Alan1=Alan2+Alan3 ve Alan2=Alan4+Alan5 ise Alan4'e yeni değer girdiğimde Alan1'in tekrar hesaplatılması için Alan2'nin "değiştiğinde" olay yordamına Alan1'i tekrar hesaplatamaz mıyız? Açıkçası ben bunu denedim. Alan4'e yeni değer giriyorum.Alan2 formülü devreye girip hesaplamayı yapıyor ve sonuç değişiyor. Fakat Alan2 değişmesine rağmen olay yordamı devreye girip Alan1'i hesaplanmıyor. Acaba bir hatamı yaptım yada "değiştiğinde" olay yordamı benim planladığım işi yapmıyor mu? Bu konuda yardımcı olursanız sevinirim.
29/12/2009, 11:42
Puletin
Kod:
Private Sub Alan3_AfterUpdate()
hesapla
End Sub
Private Sub Alan4_AfterUpdate()
hesapla
End Sub
Private Sub Alan5_AfterUpdate()
hesapla
End Sub
Function hesapla()
Me.Alan2 = Nz(Me.Alan4 + Me.Alan5)
Me.Alan1 = Nz(Me.Alan2 + Me.Alan3)
End FunctionBu işinizi görürmü?
29/12/2009, 12:49
mustafa_atr
Kardeşim derdini çok iyi anlıyorum, nacizhane tavisiyem şu olur. formulleri denetim kaynağına yazarsan dediğin gibi otomatik güncelleniyor bu durumda tabloya nasıl kaydedeceğim dersen? aynı alanlardan formda birer kopya çıkar ve bunları görünmez olarak işsaretle denetim kaynaklarını tablo olarak seç, ilgili alanları birbirine eşitle. Yani şöle; adı şeklinde kayıt alacaksan iki tane metin kutusu olacak, biri tabloya kayıt yapan gerçek adı kutusu (bu gizli olsun), diğeride forda görünen adı2 kutusu (denetim kaynağına formül yazdığın kutu), şimdi bu iki kutuyu birbirine eşitlemek için. me.adı.value= me.adı2.value şeklinde kodla, bu kodu bir tane butona yaz. Örneğin "tüm değişimleri" uygula butonu, böylelikle tek bir butonla tüm lanlarıeşitlemiş olursun.
29/12/2009, 16:34
yasinunal
Arkadaşlar hepinize yardımlarınız için teşekkür ederim. Mustafa bey size de özellikle teşekkür ediyorum. problemimi sizin dediğiniz yöntem ile çözdüm
29/12/2009, 16:47
mustafa_atr
Sorunun çözülmesine sevindim. Aslında kodlamayla bişeyler yapılıyordur belki ama ben böyle orman metodolojisine başvuruyorum genelde
1 2