(28/06/2020, 18:34)ozanakkaya yazdı:

Me.txtfider.DefaultValue = Dlookup ("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'")

Koddaki 

DLookup("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'")

kodu ile 12283 numaralı merkez_kodu değeri bulunuyor, ancak fider tablosunda merkez_kodu alanında 12283 numaralı merkez_kodu olmadığında bu hatayı veriyor. Bu sorunu, Dlookup kodu önüne NZ ekleyerek çözebilirsiniz.

Me.txtfider.DefaultValue = Nz(DLookup("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'"), 0)

şeklinde olacak, yani kırmızı renkli kısım koda eklenecek.

Nz(DLookup("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'"), 0)

Hocam yazdıklarınızı uyguladım ama olmadı.

---

(28/06/2020, 21:07)enginbeyy yazdı:

(28/06/2020, 18:34)ozanakkaya yazdı:

Me.txtfider.DefaultValue = Dlookup ("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'")

Koddaki 

DLookup("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'")

kodu ile 12283 numaralı merkez_kodu değeri bulunuyor, ancak fider tablosunda merkez_kodu alanında 12283 numaralı merkez_kodu olmadığında bu hatayı veriyor. Bu sorunu, Dlookup kodu önüne NZ ekleyerek çözebilirsiniz.

Me.txtfider.DefaultValue = Nz(DLookup("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'"), 0)

şeklinde olacak, yani kırmızı renkli kısım koda eklenecek.

Nz(DLookup("fider_kodu", "fider", "[merkez_kodu]='" & Dlookup ("merkez_kodu", "tablo", "[no]=" & AccessTr_SNO) & "'"), 0)

Hocam yazdıklarınızı uyguladım ama olmadı.
dosyayı ekledim.