Bluemind

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

اخوي للاسف سؤالك غير مفهوم؟؟!! في مشاركتك يوجد سؤال و في المرفق يوجد سؤال اخر غير مفهوم حتى التقرير غير مفهوم؟؟ رتب الاسئله وحاول شرحها بشكل مفهوم

اخوي المدخلات للوحده النمطيه تكون من النماذج هي الشغله بسيطه بس لو تسوي خير وترفق برنامجك للفائده و نحاول التغيير عليه قدر المستطاع و اسمحلي اقولك" انت ليش متحفظ على الموضوع الى هذي الدرجه؟؟!!" الحين توي عارف ان البرنامج للمطعم وتريد طباعه فواتير حسب نوع الطلبات

اخوي نجيب في المرفق يوجد قاعده بيانات تقوم باتخصيص التقرير للطباعه و استعرض الطباعه للطابعه التي تختارها انت وتقوم بتذكر اسم الطابعه لهذا التقرير في المستقبل وتقوم بطباعته على هذه الطابعه طبعا قوم باستيراد جميع النماذج و الوحدات النمطيه الى قاعد ه بياناتك وقم بعمل زر ليفتح نموذج تحديد الطابعات للتقارير لكي لاتؤثر على برنامجك الاساسي. طبعا يوجد شرح داخل النماذج ارجوا ان تحل لك هذه المشكله PrintMgt.rar

تفضل اخوي ونصيحه لا تحاول ربط الجداول باللاسماء فيما بينها حاول استخدام الارقام WLAYYAT.rar

اخوي جرب الكود التالي خلف زر الامر Dim i As Integer Dim wkb As Workbook For Each wkb In Application.Workbooks If wkb.Name <> "PERSONAL.XLS" Then i = i + 1 End If Next wkb If i > 1 Then ThisWorkbook.Close True Else ThisWorkbook.Save Application.Quit End If

اخوي كمال مشكور على مساعدتك بس اتمنى منك اكمال جميلك واعدد البرنامج كم هو مطلوب من قبل السأل.

تفضل اخوي شوف التقرير Report.rar

اخوي ليش ما تكون البيانات كالتالي: mon Tue Wed Thu Fri Sat Sun لماذا التكرار؟؟!! على العموم بامكانك عمل حقل بجانب حقل Day ووضع خصائصه رقم ثم تعبئته بالارقام 1 mon Tue 2 Wed 3 Thu 4 Fri 5 Sat 6 Sun 7

اخوي بالنسبه لوضع رقم تسلسلي للسجلات قم بالخطوات التاليه: قم بانشاء مربع نص بدون مصدر سجلات له وسمه مثلا RowCount في منطقه التاصيل او Details في التقرير اذهب الى حدث عند الطباعه او On print واكتب الكود التالي: Me.RowCount = Nz(Me.[RowCount], 0) + 1 ثم جرب معاينه التقرير اما بالنسبه للتضليل فهذا يمكن عمله عن طريق الاتي اختر مربع النص مثلا RowCount او اي مربع تريد تضليله ثم من قائمه تنسيق او Format اختر تنسيق شرطي ثم في الشرط الاول او Condition1 اختر عباره Expression is ثم اكتب الكود التالي: [Rowcount] Mod 2<>1 ثم قم باجراء التنسيقات المطلوبه ثم اوكي ثم معاينه التقرير ارجوا ان الشرح واضح

اخوي ممكن تقولي ايش الفائده من تكرار اسم اليوم في الجدول؟؟!! انا شايف فيه ايام كثيره مكرره على التوالي !!!

اخوي ممكن تقولي ايش معنى علامات ذكيه؟؟!!

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

اخوي حل مقترح لم ياخذ من الوقت سوى 10 دقائق وبدون برمجه اواي شى لتطويره اذهب الى منتدى الاكسس مع العلم ان ملف الاكسل وتحديدا في عمودالارقام الموظفين يوجد تكرار وباسماء مختلفه Employee_Profile.rar

مشكور اخوي ابو اسامه كذالك لو تم عمل سؤال اسفل المشاركه اذا تم الاجابه على السؤال او لاحتى يستفيد الاخوان عند عمليه البحث وذالك عن طريع نعم او لا

اخوي في الملف المرفق يوجد موديل او وحده نمطيه قم باستيرادها الى قاعده البيانات خاصتك بعدين في النموذج الي تبغى عجله الماوس ماتتحرك فيه قوم باضافه الكود التالي في حدث عند التحميل اوon load مع ملاحظه وجود هذا MousHook.dll الملف في نفس الملف الموجود فيه قاعده البيانات Dim blRet As Boolean blRet = MouseWheelOFF End Sub My_Documents.rar

اخوي ليش ماتستخدم لاكسس??!! اكثر امنيه واسهل في التعامل مع البيانات و التصميم

بعد اذنك اخوي رضوان اخوي قناص شوف المرفق ان شاء الله يكون هو الحل طبعا استخدم النموذج لتشغيل التقارير _____.rar

اخوي بالنسبه للترتيب الشهور اتوقع فيه جدول لها عندك، اضف حقل رقم الشهر و ضع الارقام من واحد الى 12 وبعد ذالك قم بادخل رقم كل شهر . بذالك تستطيع ترتيبها و ادراجها في استعلام سؤالك الثاني غير مفهوم؟؟!! هل تقصد استيراد المودل من ملف ثاني او ايش؟؟!!

اخوي سؤال بسيط هل اعتمدت رقم الزبون كارقم للزبون ورقم حساب له لان في جدول الزبائن يوجد ثلاثه فقط و في جدول الصندوق يوجد من 1 الى 100 او اكثر ياليت توضح اكثر

اخوي من قائمه Tools او ادوات روح حلى Startup وبعدين اختر النموذج المراد جعله يفتح بمجرد فتح قاعده البيانات كذاللك بامكانك اخفاء لوحه قاعده البيانات و الاشرطه من هذا الخيار بعدين لو حبيت انك ترجع على الجداول و النماذج .... اضغط مفتاح شيفت و استمر عليه بالضغط و افتح القاعده

اخوي هذي علامه اخفاء للجداول روح على كل ايقون و اضغط رايت كليك وبعدين خصائص وبعدين شيل علامه الصح من اخفاء او Hidden

اخوي في اي جدول تبغى الحقل هذا؟؟؟ على العموم انشاء حقل اسمه "Occupied"وخلي خاصيه هذا الحقل Yes/No من خصائص الحقل في الجدول ومن التنسيق خليه Check box

اخوي فلاح ارجوا التوضيح اكثر كذالك في اي نموذج ؟؟!!

اخوي روح على الوحدات النمطيه بعدين اضغط جديد بعدين من قائمه ادوات اختر Referances بعدين تاكد من الاشياء الي موجوده في الصوره المرفقه تكون موجوده عندك وعليها علامه صح واحتمال الاوفيس عندك فيه مشكله