السلام عليكم ورحمة الله وبركاته
اريد ان يظهر مجموع سجلات كل صفحة في أسفل الصفحة
واريد ان يظهر كل قسم في بداية صفحة جديدة
في الملف المرفق
.
devoter كتب:السلام عليكم ورحمة الله وبركاته
اريد ان يظهر مجموع سجلات كل صفحة في أسفل الصفحة
واريد ان يظهر كل قسم في بداية صفحة جديدة
في الملف المرفق
.
وعليكم السلام ورحمة الله وبركاته
تفضل اخي الكريم
1. مجموع سجلات كل صفحه في اسفل الصفحة
2. كل قسم يظهر في بداية صفحة جديدة
بالتوفيق
devoter كتب:السلام عليكم ورحمة الله
بارك الله في جهودكي فيك معلمتنا ام عهود
ومشكورة على الحل الجميل
ولكن تبدو انا المشكلة لدي في هذا المثال
بعد ما فتحت ملف الحل ظهر مشكلة في الجمع ويبدو ان المشكلة لدي
اوضحهها بالصورة المرفقة
اخي الفاضل
يبدو ان برنامج الأكسيس لديك ليس معربا كاملا
لأنه في النسخة العربية يكون قسم التفصيل بهذا الشكل
Private Sub تفصيل_Print(Cancel As Integer, PrintCount As Integer) PageSum = PageSum + Reports![Report]![المبلغ] End Sub
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) PageSum = PageSum + Reports![Report]![المبلغ] End Sub
الإختلاف فقط في كلمة تفصيل في العربية و Detail في الإنجليزية
وهذا الملف بعد التعديل الأخير بما يتناسب مع برنامج الأكسيس لديك
بالتوفيق
بارك الله فيكي اختي الكريمة
على هذه الجهود الرائعة
الاستاذه / زهراء
لى ملحوظة على الحل السابق حيث انه على هذا الوضع
سيعطى نتيجة خطاء حيث انه فى بعض الأحيان
سيضيف اول سجل فى الصفحة التاليه الى مجموع الصفحة الحالية
ولحل المشكلة نضيف جملة if حيث ان هناك متغير اسمه Printcount
ويضاف الجملة
if Printcount=1 then
pgsum=pgsum+sumx
endif
lu [.dg hga;v
جزاكم _الله_خيرا
عَنْ عَائِشَةَ ر ضي الله عنها قَالَتْ: سَمِعْتُ النَّبِيَ يَقُولُ: «الأَرْوَاحُ جُنُودٌ مُجَنَّدَةٌ؛ فَمَا تَعَارَفَ مِنْهَا ائْتَلَفَ، وَمَا تَنَاكَرَ مِنْهَا اخْتَلَفَ»
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…