السلام عليكم
الكود التالى
Me.نص32 = DCount("tt2", "Q_Mo3edInMonthS1", " '[Q_Mo3edInMonthS1]![' & tt2 &'] = -1'")حيث tt2 مربع نص فى تقرير
Q_Mo3edInMonthS1 استعلام
و به حقل اسمه m11
قيمة tt2 فى التقرير = اسم هذا الحقل m11
الكود يرجع القيمة "نعم" صحيحة
لكن القيمة "لا" يرجعها صفرا
فما الحل
= الكود يعد السجلات فى الاستعلام المشار إليه بشرط أن يكون الحقل m11 = نعم أو لا
شكرا لكم
تم تعديل هذه المشاركة بواسطة أبو لميس في 7 ديسمبر 2013 في 17:57
اعتقد والله اعلم ان السبب هو في حاصرتي النص هذه '
وذلك انك تتعامل مع رقم وليس مع نص
جرب ذلك او ضع مرفق وان شاء الله ستجد الحل
صفحتي الشخصية في منتدى أوفيسنا
اعذروني ففي الفترة القادمة سيكون تواجدي في المنتدى ضيق جداً وذلك للانشغال في دورة لمدة 6 شهور بعد الدوام
جزاك الله خيرا أخانا الحبيب عبد الله
و الله وحشتنا كثيرا
فين أيام الإكسيل؟
أنا جهزت مثالا
و إن شاء الله أخرج من هذا الموضوع بالحل
----
------
اهل بك استاذي الفاضل عبد الفتاح
جرب هذا التعديل فان شاء الله يفس بالغرض
Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer) Me.s1 = DCount(Me.tt2, "myquery", Me.tt2 & "=-1") Me.s2 = DCount(Me.tt2, "myquery", Me.tt2 & "=0") End Sub
صفحتي الشخصية في منتدى أوفيسنا
اعذروني ففي الفترة القادمة سيكون تواجدي في المنتدى ضيق جداً وذلك للانشغال في دورة لمدة 6 شهور بعد الدوام
صدق ظنى
رائع جدا
هذا هو المطلوب
لم يخطر ببالى أبدا هذا الشكل
Me.s1 = DCount(Me.tt2, "myquery", Me.tt2 & "=-1") Me.s2 = DCount(Me.tt2, "myquery", Me.tt2 & "=0")
لأنى أعلم أن الشرط فى هذه الدالة يوضع بين علامتى اقتباس
لكن يبدو أن هذا فى الاستعلام
وليس فى vba
جزاك الله خيرا و بارك فيك و فى أهل اليمن
شكراً لك استاذ عبدالفتاح
ولا انسى فضل الله ثم فضلك في تعليمي الاكسل
وحشتنا في اوفيسنا
صفحتي الشخصية في منتدى أوفيسنا
اعذروني ففي الفترة القادمة سيكون تواجدي في المنتدى ضيق جداً وذلك للانشغال في دورة لمدة 6 شهور بعد الدوام
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…