استاذى ومعلمى الجليل الخبير الفاضل jjafferr
شكرا لحضرتك ياصاحب اجمل تورتة قدمتها لى ولجميع اعضاء المنتدى وهى التعامل مع الدالات بجميع انواعها
شكر خاص لحل مشكلتى التى اتعبتنى اسابيع لقلة خبرتى جعل الله علمك الذى لا تبخل بة على احد فى ميزان حساناتك
ياريت تخبرنا وين كانت المشكلة 🙂
المشكلة كما اشرت حضرتك المسافة الموجودة بالكود واسم الحقل كنت بكتبة kind_haraka كما بالجدول ولكنى فى النموذج احتصرت الاسم الى KH الشكل النهائى للكود الصحيح
Dim myWhere As String
myWhere = "fat_num = " & Forms!Fatora_be!Fat_num
" myWhere = myWhere & " And
"'" & myWhere = myWhere & "kind_haraka = '" & Forms!Fatora_be!KH
Me.total_fatora = Nz(DSum("total", "Haraka", myWhere), 0)