Say alanı

Merhaba,

Yardımcı olmak istiyorum ancak sorunuzdan hiçbir şey anlamadım. Anlayan arkadaşlar yardımcı olurlar.

Arkadaşlar özür dilerim örnek yanlış eklemişim. 1. mesajdaki örneği düzeltim.

Merhaba,

kullandığınız kod

Me.Say = Dlookup ("[Say]", "is", "[Yap_is]=" & Me.Yap_is)

kodda kriter olarak kullandığınız Yap-is alanı metin olduğu için tek tırnak içine almanız gerekiyor.

Me.Say = Dlookup ("[Say]", "is", "[Yap_is]='" & Me.Yap_is & "'")


Özel lab mevzusunda - olması için -1 ile çarpmanız gerekli, Üst formdaki veriyi kontrol edip özel lab ise *-1 olmalı.

Private Sub Yap_is_AfterUpdate()



If [Forms]![Tablo1]![Per_Ad] <> "ÖZEL LAB." Then



Me.Say = Dlookup ("[Say]", "is", "[Yap_is]='" & Me.Yap_is & "'")



Else



Me.Say = Dlookup ("[Say]", "is", "[Yap_is]='" & Me.Yap_is & "'") * -1



End If





End Sub

Sayın ozanakkaya hocam emeğine sağlık istediğim buydu teşekkür ederim.

Ozan hocam yine bu "ÖZEL LAB." da "RPT ÜT","RPT AT","RPT ÜP","RPT AP","RPT AÜT" bu işlemleri seçince 0 atması için ne yapmalıyız.
teşekkür ederim.