ابوأثير

حياكم الله اساتذتي الشرح واضح في المرفق والصوره والقيمه اذا كانت k تتحول في المربع الاحمر الى K.e وشكرا

السلام عليكم ورحمة الله وبركاته اخواني الكرام : لدي برنامج مطلوب التالي فيه : عندي مجموعة اختصارات وابغى تدخل تلقائي في المربعات اللي باللون الاحمر الطريقه اذا اذا كانت قيمة A أو B = ? فتكون تلقائيا قيمة C أو D = ? تلقائيا اذا اذا كانت قيمة A أو B = ? فتكون تلقائيا قيمة C أو D = ? تلقائيا واذا كانت ارقام عربية تتحول انجليزيه ويتم التحديث فور الانتقال من الحقل انا عندي تقريبا 33 قيمة بس ما ابي اتعبكم بس ابغى الطريقه الاسهل للبدايه وانا بكمل بارك الله فيكم الشرح واضح في المرفق بارك الله فيكم FR-to.rar

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

كان الكود الاول كذا بس كان كذا Private Sub co1_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[id] = " & Str(Nz(Me![co1], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark aaa.SetFocus End Sub والاخير كذا Private Sub co1_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[Emp_No] = " & Str(Nz(Me![co1], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark Me.Emp_No.SetFocus End Sub ما ادري وش الحل

الان صار يغير بس ابغاه يحصر التنقل للخيار اللي اخترانه من فوق يعني اذا اخترت الحراسات الثابته في النموذج يعرض لي الاشخاص اللي يعملون في الحراسات الثابته ويجري على بقية الادارات

اخي ابو خليل المرفق لا يعمل مثل السابق ممكن تتطبق لي على المرفق التالي بحيث يتم التغيير مع تغيير مربع التحرير والسرد والانتقال اتمنى تطبق لي على هذا المثال فقط ولكم الشكر جميعا DS2X-2.rar

الكود في المشاركة رقم 9 لايغيير بعد الاختيار من القائمة المنسدلة ولكنه ينقل التركيز اتمنى وضحت المشكله

اخوي ممكن تجرب الكود انت الكود لا يعمل نهائيا

بارك الله فيك اخي محمد ولكن هل تستطيع تصحيح الكود في المشاركة رقم 8 لهذا المرفق لان هذا هو المطلوب وشكرا

السلام عليكم ورحمة الله تم تغيير بسيط عندي في البرنامج ولم يعد يعمل الكود الرجاء المساعدة في الملف المرفق DS2X-2.rar

تم حل المشكلة والف الف الف شكر لكل من ساهم معي في الحل وزادكم الله من علمه ووفقكم جميعا لما يحبه ويرضاه

بارك الله فيكم اخواني الكرام ولكن الا يوجد طريقه اخرى بدون ملف dll وانا اصلا يهمني تحريك الماوس ولكن شغله تكون مثلا بعد التحديث نقل التركيز الى مربع اخر والشرح في المرفق DS2+.rar

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

السلام عليكم ورحمة الله وبركاته لدي برنامج ارغب تعديل جزء منه ليساعدني في البحث والترتيب ما اعرف اوصل المعلومة كتابياً ولاكن يوجد مثال للتوضيح المثال من هنا وهو مرفق آمل منكم مساعدتي ودمتم دمتم بود DS.r3d.rar

جزاك الله خيرا وزادك علما ومعرفة

بالفعل فكرة رائعة

الف شكر اخي ابو خليل والله انه لشرف لي ردك على موضوعي ولك مني الدعاء في ظهر الغيب تحياتي لك ولكل من في هذا المنتدى الغالي العزيز على قلبي للعلم تراني من قدماء المنتدى 2003

ياليت لو تكون على اوفيس 2003 بارك الله فيك

السلام عليكم ورحمة الله وبركاته اخواني الشرح واضح في المرفق والله يبارك فيكم r3d.rar

بارك الله فيك على جهدك ونفع بك الف شكر لك

سويت مرفق بس ما ادري وش صار عموما تقضل اخي

السلام عليكم ارغب في عرض تقريرين في ملفي المرفق 1 يكون يعرض جميع الاسماء اللي في النموذج 2 يعرض فقط الاسماء اللي ماعليها علامة صح 3 يعرض الاسماء اللي عليها علامة صح لخالها ادري طولتها بس محتاجكم وبارك الله فيكم

البرنامج موجود هنا في جهازك C:\Program Files\school البرنامج مفتوح المصدر ونفعني كثير اسأل الله ان يبارك في الاخ اللي عمله ولا تظلم الرجال

اتمنى اقدر اساعدك بس معرفتي قليله للــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ ــــــــــرفع

السلام عليكم سلمت و سلمت يداك بارك الله فيك و جزالك الله خيرا تحياتي