شكرا استاذي الجليل أبو خليل
سؤال : التصفية حسب معيار العمر من 6 سنوات الى 17 يظهر وغيرهم لايظهر في SearchListZT
تكون هكذا كما في الاستعلام
And ((Year(Date())-[anneNes])>=6 And (Year(Date())-[anneNes])<=17));
السلام عليكم
تكملة للبرنامج
البرنامج يحتوي على :
- رقم الزوج - رقم الزوجة غالبا يكونان نفس الرقم ولكن فما حالات الزوج لديه زوجة ثانية هنا يختلف رقم الزوجة
والابناء يحتون على رقم الزوج ورقم الزوجة
وجدت مشكلة في فلترة الاطفال الذين تترواح اعمارهم مابين 6 سنوات الى 17 سنة اي سن التدريس في فورم A4
في حالة اختلاف رقم الازواج والصورة توضح ذلك
enfent_6or17.rar
استاذي العزيز Foksh
اذا استبدلت مربع خانة الاختيار بمربع عادي غير منظم وتكون النتيجة فيه X
صراحة لان خانة الاختيار في التقرير ظهرت حجمها صغير جدا
قكيف يتم استبدالها
IFX.rar
السلام عليكم اساتذتي الكرام
وجدت مشكلة عند تنفيذ دالة IF
عند الضغط على اول عنصر في مربع تحرير وسرد C8 يجعل خانه الاختيار S1=-1
عند الضغط على ثاني عنصر في مربع تحرير وسرد C8يجعل خانه الاختيار S2=-1
عند الضغط على ثالث عنصر في مربع تحرير وسرد C8 يجعل خانه الاختيار S3=-1
عند الضغط على رابع عنصر في مربع تحرير وسرد C8يجعل خانه الاختيار S4=-1
IF.rar
تم حل المشكلة ولله الحمد شكرا لك استاذ نافل على طرح فكرة الاستاذ جعفر وذكرتني بها علما انها كانت عندي وكنت ناسيها مع جزيل الشكر ايضا للاستاذ Foksh على المجهودات المبذوله لتلبيه حاجيات الاخوة .
السلام عليكم اساتذتي الكرام لقد ضاع حلم برنامجي الذي كنت اعمل عليه طيلة مدة معينة بسبب تغيير خط في احد التقارير وهذا الخط هو geeza-pro-regular مع ونداوز 8 اوفيس 2010 فكيف يمكن استرداد البرنامج لكي يصبح يشتغل من جديد
شكرا استاذي الكريم
الحمد لله كتوصلنا الى حل نهائي للمعضلة
التي اخذت من وقت استاذنا وحبينا Foksh الذي ارفع قبعة التقدير والاحترام له عرفانا لجميله واهتماما الكبير بموضوعي
صدق من قال التحذي يخلق المعجزات
فالاجابة كما أشرت هو من كان السبب في انجاح الكود
انت بدورك عملت تغيرات دقيقة ويمكن تكون بسيطة على تنسيق التاريخ
وهو اصلا كان شاكك في هذا من قبل
دمتم اوفياء للمنتدى وفقكم الله وسدد خطاكم
استاذي الكريم انت تخاطب مبتدي بالدرجة المتوسطة في الاكسس ولست خبير
ثانيا : عند التجربة وبالكود الذي ارفقته رجعت لاول مشكلة وعند تغيير تنسيق التاريخ
Format$(Dat, "\#mm\/dd\/yyyy\#"
يرجع الكود يعمل بصفة عادية
ولكن هذه المشكلة أظن تخيناها منذ صباح اليوم
نفس المشكلة كما في الصور التي ارسلتها قبل اليوم
انظر الفرق بين تنسيقك بالاعلى وتنسيق الاستاذ ابو البسملة بالاسقل صديقي
Dat = Format(DateAdd("m", i, Me.Month_From), "yyyy-mm-dd")
rst.FindFirst "[Payment_Month]=" & Format$(Dat, "\#mm\/dd\/yyyy\#")
شكرا استاذي الكريم على الاهتمام
اظن ان الكود الذي ارفقته قديم اي قبل التعديل الذي لاخطناه من طرف الاستاذ ابو البسملة
لاني رجعنا الى نفس المشكلة هذا من جهة ومن جهة ارسلي كود التعديل فقط بخصوص مسح المبلغ اي اين تم التعديل من حضرتك استاذي العزيز
شكرا استاذ
فعلا التاريخ لما صححته وعاودت تنفيذ الكود رجع عادي اما المبلغ مزال فيه اشكالية ولكن مايحرني المجموع 10.000.00بالاسفل معناه المبلغ المحذوف محسوب
وهو كذلك تم بفضل الله وبخبرة الاستاذ الفاضل أبوبسمله
حل المشكلة التي ارهقت الاستاذ Foksh ربي يخفظه
عيدكم مبارك وكل عام وانت بالف خير
وربي يحفظك وشكرا على مرورك الطيب
فما اشكالية بسيطة حسب الصورة ياريت طلة جديدة في تنفيذ الكود
والله اتعبتك استاذي - سامحني - لا شي تغير
فما مشكلة منعرف اين تكمن
اساتذتي الكرام ارجو منكم ان تمرو على الموضوع عسى لديكم العصا السحرية لحل هذا الاشكال الذي ارهق
الاستاذ Foksh وهو بدوره مابخل من تجارب وهو مشكور على ذلك وبارك الله فيه على المجهود المبذولة
ولكن لم نصل معا الى حل نهائي