Ekli dosyada istediğiniz uygulanmış durumda bir inceler misiniz?
Kolay anlayabilmeniz için adım adım açıklayayım
Öncelikle cari tablonuzda kuyu metrajlarını toplayan aşağıdaki sorgu oluşturuldu ve qry_kuyumtj adı ile kayıt edildi
SELECT cari.KuyuNo, Sum([sediman]+[karotlu]) AS toplam
FROM cari
GROUP BY cari.KuyuNo
HAVING (((cari.KuyuNo)=[Formlar]![carihasap]![KuyuNo]));
Cari formunuzu açtığınızda kayıt seçiciler ile kayıtlar arasında gezindiğiniz görülüyor. kuyuno için herhangi bir seçici kontrol kullanmadığınız için form_current olayına formunuz geçerli iken kuyuno alanı değerine göre toop değerini atayacak kod eklendi:
Me.toop = Dlookup ("toplam", "qry_kuyumtj", "kuyuno='" & KuyuNo.Value & "'")
Umarım istediğiniz gibi olmuştur.