نجوم المشاركات

شكرا جزيلا لكل من اجابني على سؤالي ... جعلها ربي في ميزان حسناتكم ...

جميل جداً .. وبعد أذن أخي الكريم @alaa aboul-ela =DCount("[ID]","Table1")

جرب ده كده DCount("id", "tabel1" dcount.rar

تفضل صديقي العزيز .. هل هذا طلبك قاعدة بيانات.accdb ؟ تم انشاء استعلام فرعي مبني على الاستعلام الرئيسي والذي هو مصدر بيانات التقرير ، لعد السجلات دون تكرار باعتماد الحقل No ، كما في الكود التالي :- Dim db As DAO.Database Dim rs As DAO.Recordset Dim recordCount As Long Set db = CurrentDb Set rs = db.OpenRecordset("SELECT COUNT(*) AS RecordCount FROM (SELECT DISTINCT [No] FROM Query1);") If Not rs.EOF Then recordCount = rs!recordCount Me.Text13 = recordCount End If rs.Close Set rs = Nothing Set db = Nothing

احيانا تحدث معي .. اقف حائرا امام مسألة ويكاد ينفجر رأسي من التفكير والمحاولات ... فالخطأ الذي يظهر امامي غير منطقي لأني استوفيت كل المتطلبات وطبقت بصورة صحيحة وبعد بذل الكثير من الجهد والوقت اتوقف ( استراحة محارب ) .. ثم اعيد المسألة من الصفر.. فأعثر على السبب ودوما يكون سبب الخلل تافه جدا .. لا يخطر على البال

جزاك الله خيراً أستاذنا ومعلمنا @ابوخليل ، هو فعلاً تم التعديل للمتغير Dbl . وأيضاً هذه النقطة أخذت في الحسبان . هذه النقطة الصحيح انها فاتتني ولم انتبه لها