محمد التميمي

من رخصة استاذ حسام تفضل على طريقتي انشأت نموذج وسميته Filter وبدوره تستطيع فلترة اي محافظة وطباعة الناتج بتقرير DB2.rar

على قدر أهل العزم تأتي العزائم مبروك استاذ صالح الترقية ياصاحب العزيمة القوية ونسأل الله (جل جلاله) لك بالموفقية والسداد

شكرا للسائل شكراً استاذ حسام انا ايظاً كنت بحاجة لهذا الموضوع

بارك الله بك مشكور استاذ حسام

بارك الله بك بجهودك

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

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

شكراً استاذي الكريم ساجرب واوافيك بالنتيجة نعم هذا المطلوب بارك الله بجهودك استاذي الكرم

السلام عليكم لدي قائمة منسدلة باسم ww مخصصة لبحث الاسم لاكن عند اختيار اسم ليس في القائمة واضغط انتر تظهر الرسالة التي في الصورة ويتعذر الخروج من القائمة الا باجبار المستخدم باختيار اسم منها المطلوب اخواني اريد عند ادراج اسم ليس بالقائمة سهولة الخروج من القائمة دون اختيار اسم منها اجباري وعدم ظهور هذه الرسالة جزاكم الله خير الجزاء 33.accdb

بارك الله بك وجزاك خيراً برنامج يستحق التقدير

خالص أمنياتنا ودعواتنا بأن يزيدك الله من فضله، وتزداد علماً وتقوى استاذ Khalf 🌹

شكرأ شكرأ استاذي الكريم

نعم فعلاً هذا المطلوب لقد جربت الكودين ويعملان بسلاسة شكرأ جزيلاً اخي الكريم

نعم كان من المفترض ان اوضح عندي كود يعمل بعدم ترك الحقل فارغ وفي نهاية الكود لا اوريد امر Cancelevent انما اوريد االرجوع الى الحقل السابق اين كان اسمه مجرد الرجوع فقط If IsNull([Namee]) Then MsgBox "لاتترك الحقل فارغاً **هذا الحقل اجباري ** ادخل الاسم الرباعي", vbCritical + vbMsgBoxRight, "تحذير ..!!" DoCmd.CancelEvent End If شكرأ

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

من بعد اذن استاذ محمد اخي سامر الكود الاول يعمل بامتياز وقد أضفت لك اربع محافظات school.rar

احسنت اخي واستاذي حسين سأعمل بما اشرته علية ان شاء الله ، كنت اتصفح قاعدة بيانات احد الاصدقاء ولاحظت وجود هكذا استعلام فيه جميع الجداول المرتبطة . واذ لم تنجح الطريقة سأنتقل الى الخيار الثاني في انشاء جدول باسم Export بارك الله بجهودك شكراً جزيلاً 🌹

السلام عليكم الملف المرفق يرجى تحميله من الرابط ادناه بسبب حجمه اولاً لدي نموذج باسم Export مخصص لتصدير الجداول والستعلام والتقارير الى اكسل ولاكن بعد التصدير تظهر القيم المرتبطة بجداول فرعية على شكل ارقام ولقد وضحتها في صورتين المطلوب التعديل على الكود لتخطي هذه المشكلة ثانياً الكود في النموذج Export قمت بكتابته يدوياً و يعمل بشكل جيد ولاكن اذا قمنا باستيراده النموذج ملف اكسس اخر او نسخ الكود الى نموذج اخر لا يعمل الاستيراد او النسخ الجديد وتظهر عند استعمال النموذج هذه الرسالة مع فائق الشكر والتقدير http://www.mediafire.com/file/fp2a63r7mati97p/file

اخي لا يوجد تقرير في المرفق على كل حال اليك الاكواد التي تحتاجها 1- كود طباعة البحث ضعه في زر امر Dim RName, FldCriteria As String RName = "اسم التقرير" FldCriteria = "[اسم الترقيم في الجدول]=" & Me![اسم الترقيو في الجدول] DoCmd.OpenReport RName, acViewNormal, , FldCriteria 2- كود تصدير التقرير الى اكسل On Error Resume Next DoCmd.SelectObject acReport, namerpts DoCmd.OutputTo acOutputReport, namerpts, "MicrosoftExcelBiff8(*.xls)", "", True, ".xls", , acExportQualityPrint

اين المرفق اخي ليتم التعديل عليه

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

السلام عليكم تعلمنا من اساتذتنا الكرام في هذا المنتدى العظيم (والعظمة لله) ان عملية الضغط والاصلاح لقاعدة البيانات باستمرار اي بمعنى كل فتح واغلاق يتلف البيانات لاكن عندما يعمل مدخل البيانات بأدخال بيانات كثيرة وفتح واغلاق بكثرة وبدون ضغط واصلاح ايضاً يتلف البيانات . لان القاعدة التي يعمل عليها شخص ما غالباً ما تكون مغلقة ولا يستطيع الذهاب الى صفحة الخيارات ومن ثمة اختيار ضغط واصلاح . السؤوال : هل نستطيع انشاء زر امر يحتوي على كود ضغط واصلاخ ونضعه مثلاً في نموذج الواجهة لاكن بشرط وهذا الشرط يكون رز الامر هذا مخفي ويظهر لنا مثلاً كل اربعة ايام او اكثر او اقل وفي اي وقت نختاره يكون فاصل زمني بين عملية ضغط وآخرى . واعتذر للاطالة عليكم شكراً

اخي واستاذي kanory كنت اعما هكذا ولاكن عند الانتقال بدون حفظ فوجئت بالرسالة وشككت بالموضوع اذا كل والحمد لله كل شي طبيعي بارك الله بك اخي الفاضل