أبو حوده

جرب هذا الكود على زر الامر اللى بتفتح به النموزج الجديد ' افتح الفورم الجديد DoCmd.OpenForm "NewFormName" ' اجعل الفورم الرئيسي يذهب إلى الخلف Me.SetFocus DoCmd.RunCommand acCmdAppMinimize DoCmd.RunCommand acCmdAppMaximize

للرفع

السلام عليكم ورحمة الله وبركاتة فى مشكلة واجهتنى عند دمج داله DLOOKUP مع IF الشرط الاول يطبق بدون مشاكل لكن الشرط الثانى هو المشكلة مش عارف ايه مشكلتة بيظهر نتائج غلط ومرة يظبط و10 لا المفروض يدور على القيمة فى الجدول CUSTOMERS لكن هو على ما اعتقد فية حاجة غلط مش عارف اوصلها ممكن مساعدة فيها والكود بيشتغل عند الاختيار من مربع السرد والتحرير المشكلة بوضوح عند البحث من خلال Combo box لو الاسم دة موجود فى جدول CUSTOMERS بتطابق ثلاث حقول يحذف نهائى عن طريق الرساله التى تفيد بأنه مكرر ( مثل الاسم / جمعة سلامة مطاوع من القاعدة ولو تم تطابق الاسم من جدول X مع الاسم من جدول CUSTOMERS ويكون تاريخ الحجز الموجود فى جدول X اكبر من تاريخ الحجز فى جدول CUSTOMERS بمقدار 15 يوم تظهر الرساله تفيد بأن السجل مكرر زى مهتظهر الرساله لحضراتكم بالضبط لكن المشكله ان مثلا السجل بأسم / طاهر علي حسن بتظهر عليه الرساله رغم انه مش موجود اصلا فى الجدول CUSTOMERS مع العلم ان ممكن الاسم يتكرر فى جدول X اكتر من مرة وانا بقوم بالفلترة اول بأول على حسب الاجراءات . دمج IF DLOOKUP.accdb

السلام عليكم ورحمة الله الله وبركاتة اولا انا عارف ان الموضوع تمت الاجابة عنه سابقا ولكن الفكرة عجبتنى جدا فسؤالى لاخى فى الله الاستاذ @سامي الحدادلكن لو قمنا بعمل جدول تانى وليكن باسم input1 وعملناه مصدر لنموذج تانى وليكن باسم m1 والجدول ده هو اللى هيبحث فيه عن تكرار لو السجل اللى انا ادخلته فى الجدول الاول اللى هو input موجود فيه تظهر الرساله ان مكرر ويظهر السجل على النموزج m1 حاولت اعملها لكن فشلت ممكن مساعدة هنا ولا افتح موضوع جديد ونضع السؤال فيه ارجو الافاده abcd.accdb

هو المطلوب بارك الله فيك اخى @abouelhassan سلمت يداك وجعله الله فى ميزان حسناتك

السلام عليكم ورحمة الله وبركاتة المطلوب : استخراج تاريخ التجديد حتى يصبح اكبر من تاريخ الجهاز بمعنى لو عند إضافة 5 سنوات للتاريخ والناتج اقل من تاريخ الجهاز يفضل يضيف خمسة سنوات لغاية ميبقى الناتج اكبر من تاريخ الجهاز مع الاحتفاظ بيوم وشهر التعيين زى اول خليه منا عملتها بيدى ومرفق مثال للتوضيح شرط 1.xlsx

طيب ماهية كيفية عمل ذلك

ممكن حضرتك ترفق الوحدة بعد الاستغناء عن الاسطر المشار اليها للافادة ؟؟؟؟

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

انا اسف لارهاق الجميع معى لكن هذا مثال مصغر للمشكلة التى تواجهنى New Microsoft Access قاعدة بيانات.accdb

فى كلا الكودين بيظهر نفس الخطأ مش عارف المشكلة من عندى ولا لا انا بستخدم اوفيس 2013 New Bitmap Image (2).bmp

نعم استاذنا ومعلمنا ومشرفنا القدير @ابوخليل يوجد علاقة تكامل مرجعى بينهمNew Bitmap Image (4).bmp

عملتها بالفعل ويظهر هذا الخطأNew Bitmap Image (2).bmp New Bitmap Image (2).bmp

طيب حضرتك لو اسم الحقل المربوط به الجدولين فى جدول الفاتورة بيكون اسمة FatoraId وفى جدول الحركة بيكون اسمة Fatora_id بيكون الكود فية اختلاف كبير معلش هتعبك معايا لانى حاولت استبدالهم لكن معرفتش

اشكر حضرتك جدل لسرعة تفاعلك مع موضوعى ولكن احب اوضح جزئية لحضرتك الارتباط مابين الجدولين عنطريق حقل رقم الفاتورة وليس id بمعنى ان كل جدول فيه حقل ترقيم تلقائى منفصل عن الاخر والجدول الرئيسى الفاتورة... السجل فى الجدول الحركة مرتبط به عن طريق حقل رقم الفاتورة Fatora_id