أ / محمد صالح

السلام عليكم ورحمة الله وبركاته أستاذ سعيد أسعد الله أيامك انت عارف اليومين دول مراقبة الثانوية العامة لاحظ هذا المرفق تم تعديل معادلة المدير وبالنسبة لظهور الصفر فهذا لأن مردود الدالة رقم فلا تعود الدالة بنص فارغ ويمكنك إخفاء الصفر من خلال File -> options -> Advanced -> show a zero in cells that have zero value رمضان مبارك لا تنساني من دعوة وقت الإفطار دالة معرفة لعدة شروط2.rar

* هذا هو المطلوب من عرض البرنامج اختبار هل يمكن التلاعب بالتاريخ؟ * الكود الخاص بكل جهاز هنا بسيط وهو (رقم الدرايڤ دي) ويمكن لكل واحد يعرض رقم القطع التي يريدها * إدخال نفس السيريال في حالة تثبيت نسخة ويندوز حديدة المهم في الموضوع هو الفكرة وآلية التنفيذ بانتظار آراء من قام بالتجربة

هذا الكود يؤكد كلامي أخي شيفان حيث ان حدث عند الضغط يخص النموذج ولا يخص قاعدة البيانات ككل متى يكون هذا ممكنا؟! بدون وضع الكود الثاني في حدث عند الضغط Form_keydown والله تعالى اعلى واعلم

لا أعتقد أن هذا ممكن فهذا الحدث موجود في النموذج فقط ويجب تكراره في كل نموذج تريد فيه تنفيذ الكود والله تعالى أعلى وأعلم

لا يوجد سبب فهذا هو المطلوب تيسيرا على المستخدم يبدو أن حضرتك ما قرأت هذا الجزء جيدا والمدة هنا يومان فقط لنرى من سيجعل البرنامج يعمل لأكثر من يومين بدون استخدام أداة التفعيل فأداة التفعيل تجعله يعمل إلى الأبد وفقنا الله وإياكم لكل خير

اعرض الملف عمل نسخة تجريبية لمدة محددة بعدها التفعيل بسيريال خاص بكل جهاز بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته ------------------------ كل عام أنتم بخير وسعادة ورضا رمضان مبارك ================ استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بعمل نسخة تجريبية في الأكسس لمدة أسبوع أو شهر أو أي مدة تحددها في الكود ************************** ولا يطلب البرنامج التفعيل إلا بعد انتهاء المدة التجريبية وكذلك لا يجوز اللعب في تاريخ الجهاز لأنه سيتم اكتشافه /////////////////////////////////////////// مرفق ملفان واحد للبرنامج وملف لإنشاء السيريال للتجربة والاختبار واكتشاف الثغرات وهذا فيديو شرح الفكرة والكود +++++++++++++++++++++++++ ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** الكود يعمل على كل إصدارات الأوفيس لأنه تم عمله بأوفيس 2003 دمتم في رعاية الله وحفظه =-*/+=-*/+=-*/+=-*/+ إن شاء الله صاحب الملف أ / محمد صالح تمت الاضافه 07 يون, 2017 الاقسام قسم الأكسيس

وإياكم أخي الكريم يوجد في المنتدى الكثير من برامج الجداول المدرسيه يمكنك استخدام البحث عن الجدول المدرسي جداول الفصول ربما تستفيد منها

تفضل أخي الكريم تم استحداث دالة بالكود لجلب الحصص ومعادلة بحث لجلب اسم المعلم وأنصح بتسمية الشيتات بالانجليزية لتسهيل كتابة المعادلات عليك وفقنا الله وإياكم لكل خير ترحيل للجدول العام.rar

تفضل أخي الكريم تم تحويل المعادلة إلى دالة معرفة مع مراعاة أن المدير يزيد عن المدرس 150 وغيرهما صفر وذلك في كل الشهور ما عدا 7 و 8 دالة معرفة لعدة شروط2.rar

كل عام وأنت بخير أخي الكريم أبا عبد الرحمن لازم دالة معرفة UDF مينفعش معادلة عادية؟ جرب أن تضع في الخلية K2 =IF(OR(D2="مدير",D2="مدرس"),TRUNC(IF(IF(H2<>"",5,IF(AND(G2<>"",MID(E2,1,3)="جزء"),4,IF(MID(E2,1,3)="جزء",3,IF(G2<>"",2,1))))=5,SUM((B2*C2+150)/DAY(EOMONTH(I2,0))*(I2-H2+1),((B2*C2+150)*MID(E2,4,2)/100)/DAY(EOMONTH(F2,0))*(G2-F2+1)),IF(IF(H2<>"",5,IF(AND(G2<>"",MID(E2,1,3)="جزء"),4,IF(MID(E2,1,3)="جزء",3,IF(G2<>"",2,1))))=4,((B2*C2+150)*MID(E2,4,2)/100)/DAY(EOMONTH(F2,0))*(G2-F2+1),IF(IF(H2<>"",5,IF(AND(G2<>"",MID(E2,1,3)="جزء"),4,IF(MID(E2,1,3)="جزء",3,IF(G2<>"",2,1))))=3,(B2*C2+150)*MID(E2,4,2)/100,IF(IF(H2<>"",5,IF(AND(G2<>"",MID(E2,1,3)="جزء"),4,IF(MID(E2,1,3)="جزء",3,IF(G2<>"",2,1))))=2,(B2*C2+150)/DAY(EOMONTH(F2,0))*(G2-F2+1),B2*C2+150)))),2),"") هي المعادلة طويلة شوية بس إن شاء الله تؤدي الغرض

أعتقد أن استعمال كود التفعيل القديم في يوم آخر غير اليوم الذي تم التفعيل فيه يخرج رسالة ( رقم التفعيل خاطئ) ولا يجدد المدة إلا إذا استعملت ملف التفعيل مرة أخرى بكود تفعيل جديد

بارك الله لك بداية موفقة نأمل أن تستمر إلى الأمام

للإجابة على استفسارات الزملاء البرنامج يعيد المدة الى ١٤٠ يوم مع استعمال كود تفعيل جديد. * يرجع هذا لأنك تملك الملف الذي ينتج أكواد التفعيل بينما المستخدم لن يملكه. ملحوظتي الشخصية بهذا الخصوص: كيف سيتم تغيير المدة بعد الفترة التجريبية؟! علما بأن الكود المسئول عن المدة في الملف المغلق عند المستخدم. الحل : أن تكون المدة ضمن كود التفعيل يقرأها البرنامج فيكون مفتوحا لهذه المدة المحددة. ........... هل يمكن الوصول لرقم المدة في الريجيستري؟ بالفعل يمكن الوصول له من مبرمج متمكن يعرف أين يتم تخزين القيم بواسطة الفيجوال بيسك للتطبيقات. ............ وأخيرا أتوجه إلى أخي الحبيب @صالح حمادي بالتماس عدم الاعتماد على الريجيستري في تخزين كل البيانات. ممكن نعتمد عليه في تخزين قيمة رقم البرنامج والسيريال وتاريخ البداية بعد تشفيره. وفقنا الله وإياكم لكل خير

هل جربت أن تحفظها باسم جديد وبنوعية حفظ حديثة؟! من تبويب ملف file حفظ باسم save as نوعية الحفظ save as type

كل شيء ممكن بالتفكير والتحليل والتجربة والخطأ المهم الوصول لفكرة تؤدي الغرض

جزاك الله خيرا أستاذ صالح ونفع بكم

أنا أيضا أرحب بفكرة أن الإكسل أفضل البرامج في عمل الكنترول موفقين يارب

رائع أستاذ @أبا جودى بارك الله لك المنتدى بحاجة لهذه الموضوعات الجامعة التي تغني الدارسين والمهتمين ببرمجة الأكسس وفقنا الله جميعا لكل خير

رفع الله قدرك من غير إهانة بالتحدي والإصرار وفقنا الله وإياكم لكل خير

اعرض الملف الفرق بين تاريخين بالميلادي والهجري بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته كل عام أنتم بخير وسعادة ورضا ============== استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بالتواريخ في الأكسس مثل حساب العمر أو مدة بينتاريخين ------------------------------- سواء بالتقويم الميلادي أو الهجري ////////////////////////// سواء التاريخ منسق كتاريخ أو كنص ++++++++++++++++++ ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** الكود يعمل على كل إصدارات الأوفيس دمتم في رعاية الله وحفظه والقادم أفضل إن شاء الله صاحب الملف أ / محمد صالح تمت الاضافه 31 ماي, 2017 الاقسام قسم الأكسيس

قصدك لو (تاريخ الميلاد) التاريخ القديم هو اليوم والتاريخ الجديد هو اليوم أيضا سيكون الناتج 0 يوم 0 شهر 0 سنة ولا يوجد ناتج سالب إلا إذا كان التاريخ الجديد قبل التاريخ القديم راجع حساباتك الكمبيوتر لا يخطئ ابدا ما دام الكود صحيحا ربما يكون الخطأ من المستخدم

أعتقد لا يلزمك تغيير شيء بالوحدة النمطية لأن أي تغيير سيغير ناتج الدالة

يعني الدالة غير صحيحة؟!! أشك المدخلات غير متفقة مع المطلوب للدالة المدخلات المطلوب تمريرها للدالة التاريخ القديم كنص والتاريخ الجديد كنص