كوماندير قام بنشر يوليو 24, 2015 قام بنشر يوليو 24, 2015 السلام عليكم ورحمة الله وبركاته اخوتي الكرام عندي نموذج فيه بيانات مجموعة عملا ويتم متابعة المجموعة التي تم تسجيلهم في تاريخ معين من خلال مربع قائمة . المطلوب انه عند التنقل بين سجلات النموذج ان يتم تمييز(خط خاص ولون خاص وجعل النص مائلا ... الخ ) اسم العميل الحالي في مربع القائمة . اليكم المرفق : LastTry1.rar
رمهان قام بنشر يوليو 24, 2015 قام بنشر يوليو 24, 2015 اهلا بك اخينا كوماندير مالفائدة من ما طلبت ؟ حيث لم تظهر لي ونريد ان نستفيد ! بوجهة نظري انه العكس : عندما تنتقل بين السجلات سيظهر العملاء في القائمة وحسب التاريخ وبالنقر على العميل في القائمة يظهر العميل في النموذج ! هذا ولك ماطلبت باذن الله لاحقا وبعد معرفة الفائدة ولكن بتظليل العنصر وليس بتغيير تنسيقه ؟ لانه هناك تحدي في تنسيق عنصر القائمة في الاكسس فما بالك في احد صفوف القائمة !!!! تحياتي 1
كوماندير قام بنشر يوليو 26, 2015 الكاتب قام بنشر يوليو 26, 2015 (معدل) اخي رمهان الف الف شكر الفائده اذا كان مربع القائمة يعرض لي تواريخ زيارات عميل سابقة وباقي تفاصيل طلب هذا العميل توجد في النموذج ، فعندما تكون الزيارة التي انا بصددها مميزه بلون وخط خاصين يسهل علي اشياء كثيره . عموما بعد عناء مضن عن الموضوع توصلت الى انه لايمكنني عمل ذلك من خلال مربع القائمة . لكن يمكنني عمل ذلك من خلال نموذج فرعي وعن طريق التنسيق الشرطي . المشكله ان طريقة التنقل ضمن النموذج عن طريق مربع القائمة من خلال الكود : Me.RecordsetClone.FindFirst "[SalID]=" & Me.SalList Me.Bookmark = Me.RecordsetClone.Bookmark الان ما اريده هو طريقة التنقل بين سجلال النموذج الرئيسي من خلال النموذج الفرعي ( وكان النموذج الفرعي يقوم بعمل مربع القائمة ). مثلا عند النقر على اسم العميل بالنموذج الفرعي ينتقل الى هذا العميل بالنموذج الفرعي . وهذا المرفق : LastTry2.rar تم تعديل يوليو 26, 2015 بواسطه كوماندير
رمهان قام بنشر يوليو 26, 2015 قام بنشر يوليو 26, 2015 حياك اخي كوماندير صحيح ماقمت به من استبدال مربع القائمة كنموذج فرعي بل يمكن تغيير خصائص النموذج الفرعي حتى يظهر وكانه مربع قائمة ! واليك الكود مع اجمل تحية Private Sub SalNAme_Click() Me.Parent.Form.RecordsetClone.FindFirst "[SalID]=" & Me.SalID Me.Parent.Form.Bookmark = Me.Parent.Form.RecordsetClone.Bookmark End Sub
كوماندير قام بنشر يوليو 26, 2015 الكاتب قام بنشر يوليو 26, 2015 الف الف شكر اخي رمهان هذا هو المطلوب بالضبط لكن ياريت لو تدلنا على ضبط خصائص النموذج الفرعي ليبدو كمربع قائمة
كوماندير قام بنشر يوليو 26, 2015 الكاتب قام بنشر يوليو 26, 2015 ثم لماذا يبقى التركيز على السجل الاول بالنموذج الفرعي حتى عند نقري على سجلا غيره اريد التركيز ينتقل الى السجل الذي انقر عليه بالماوس كما بمربع القائمه بالضبط:
رمهان قام بنشر يوليو 26, 2015 قام بنشر يوليو 26, 2015 ما شاء الله اخي كوماندير شايفك ظبطت خصائص النموذج وكما بالصورة فتبدو وكانها مربع قائمة ! لذلك ارجو ارفاق الملف المعدل وكما بالصورة للتطبيق عليه ! تحياتي
رمهان قام بنشر يوليو 26, 2015 قام بنشر يوليو 26, 2015 تصدق دوختني شويتين !! تفضل وبالنظر في اخر سطر Private Sub SalNAme_Click() Me.Parent.Form.RecordsetClone.FindFirst "[SalID]=" & Me.SalID Me.Parent.Form.Bookmark = Me.Parent.Form.RecordsetClone.Bookmark Me.Parent!SalID.SetFocus End Sub بالتوفيق
كوماندير قام بنشر يوليو 26, 2015 الكاتب قام بنشر يوليو 26, 2015 الف الف شكر اخ رمهان لقد اهتديت لما فعلت سابقا لكن افضل من ذلك لو ان التركيز بقي على نفس السجل في النموذج الفرعي المستمر فهل ممكن ذلك وكيف ؟
رمهان قام بنشر يوليو 26, 2015 قام بنشر يوليو 26, 2015 تفضل Private Sub SalNAme_Click() x = CurrentRecord Me.Parent.Form.RecordsetClone.FindFirst "[SalID]=" & Me.SalID Me.Parent.Form.Bookmark = Me.Parent.Form.RecordsetClone.Bookmark DoCmd.GoToRecord , , acGoTo, x End Sub تحياتي 1
كوماندير قام بنشر يوليو 26, 2015 الكاتب قام بنشر يوليو 26, 2015 (معدل) الف الف شكر اخي رمهان هو المطلوب بعينه حُلت تم تعديل يوليو 26, 2015 بواسطه كوماندير
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.