kaser906

او استخدم هذا الكود وحده و سيفى بالغرض ان شاء الله Dim d As Date Application.SetOption "Use Hijri Calendar", True d = CDate(strdate) Me.EndDat = Format(DateAdd("d", Val(Me.Moditoha) - 1, d), "yyyy/mm/dd") Me.Day = Format(d, "dddd") Me.Daay = Format(Me.EndDat, …

أخي mrnooo2000 وجدت أن الكود إذا كان مدة الايام مثلاً 50 يوم وتاريخ البداية مثلاً 25/2/1431 فأنه يعطيني تاريخ النهاية 44/4/1431 أي أن الكود يقوم بحساب ثانياً وجدت أن الكود لايعطيني نتائج صحيحه بالنسبة لأسماء الأيام اعتذر على أزعاجك

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

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

ألله يعطيك العافية أخي mrnooo2000 كل هذا جميل جداً بقي أن دالة Cdate ترجع في الحساب الى التقويم الهجري مما يعطي نتيجة خطأ في حال كان تقويم أم القرى 30 يوم والتقويم الهجري 29 يوم لأن الدالة تعطي تاريخ يوم النهاية بزيادة يوم فعند أدخال المدة 5 أيام مثلاً ويكون ت…

مازلت بنتظار أجابه منك أخي mrnooo2000 أو أي حد من الشباب لديه الحل دالة Cdat تحسب التاريخ الهجري وهذا ما يعيدنا للمربع الأول في مشكلة تقويم أم القرى

شكراً لك أخي mrnooo2000 وجدت أن الكود الذي وضعته يعطيني يوم زيادة مثلاً اذا كانت المدة 5 ايام وتاريخ البداية 1/1/1431 فأن الكود يعطيني تاريخ النهاية بزيادة يوم فيكون تاريخ النهاية 6/1/1431 حاولت التعديل على الكود بهذه الطريقة Me.EndDat = CStr(Format(DateAdd("d…

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

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

lمساء الخير ألاخ hamidymom الف شكر وتحية على هذا البرنامج الرائع وأتمنى منك طلب أن تقوم بعمل نسخة من البرنامج على أكسسس 2007 لأن البرنامج توجد به مشاكل اذا أستخدم مع أكسس 2007م ارجو أن تقوم بتجربته بنفسك لترى الأخطاء

الأخت أم سعود اذا كنتي تستخدمي اوفس 2007 لازم أنك تفعلي خيار تمكين كافة وحدات المايكرو من خيارات > مركز التوثيق > إعدادات مركز التوثيق > إعدادات المايكرو > تمكين كافة وحدات الماكرو ( غير مستحسن يمكن أن يتم تشغيل تعليمات برمجية خطرة ) أشري عليها

بحمد لله وفضله تم التوصل للحل الأخ فتى الوادي أشكرك على الكود هذا هو المطلوب تمت الأجابه

رفع

حدثت معي مشاكل مع دالة DLookup لم أستطع وضع معيار لحصر تاريخين في مربعي نص غير منظمين إضافة أن الدالة تأتي بأول سجل فقط في الجدول DawratTidreb يعني أذا كان فيه سجل ثاني لنفس رقم الحاسب وتدخل التاريخ للسجل الثاني الدالة ترجع للسجل الأول أرجو من الأخوة المساعدة …

الله يعطيك العافية أخي فتى الوادي سأجرب الكود وأوافيك بالنتيجة تقبل تحياتي

أتمنى من أحد الأخوان يساعدني بالموضوع للأهمية

اريد عندأدخال تاريخ بالنموذج في حقل التاريخ غير المنظم المرتبط بجدول hollytawed أن يتأكد اولاً أن التاريخ المدخل لايقع بين بداية تاريخ أو نهاية التاريخ بالجدول emp على أن يكون ذلك لكل رقم حاسب الموجود بالجدولين (317 ) انا وضعت هذا الرقم كمثال مع إظهار رسالة تف…

يرفع للأهمية

اريد عندأدخال تاريخ بالنموذج في حقل التاريخ المرتبط بجدول hollytawed أن يتأكد اولاً أن التاريخ المدخل ليس موجود بالجدول emp وعندوجود تظهر رسالة بأن التاريخ موجود بالجدول emp ارجو التعديل على المرفق تحياتي test.rar

تمت الأجابة هذا هو المطلوب الله يعطيك العافية