الحلبي قام بنشر مايو 27, 2019 قام بنشر مايو 27, 2019 الاخوان صيام مقبول ان شاء الله مرفق مثال مصغر المطلوب عند الضغط في النموذج الفرعي علي اي خانة فيه تظهر نفس البيانات في الرئيسي علما بان الرئيس والفرعي لهم جدول واحد جزاكم الله خيرا الموظفين.accdb
محمد احمد لطفى قام بنشر مايو 27, 2019 قام بنشر مايو 27, 2019 تفضل كما طلبت تم العمل على id فى النموذج الفرعى و يمكنك التكرار فى اى خليه اخرى كما تريد الموظفين.accdb
الحلبي قام بنشر مايو 27, 2019 الكاتب قام بنشر مايو 27, 2019 الاستاذ/ @محمد احمد لطفى هو المطلوب جزاك الله خير وجعله في ميزان حسناتك في المثال المرفق كله تمام ولكن عند التطبيق عندي في البرنامج عند الضغط علي id في الفرعي يقوم بالمطلوب ولكن ينقل التركيز علي اول سجل في الفرعي لم ادري لماذا هل هناك حل حتي يظل التركيز علي الحقل المختار
qathi قام بنشر مايو 27, 2019 قام بنشر مايو 27, 2019 (معدل) بعد أذن أخي @محمد احمد لطفى تفضل وهذا كود أخر من استاذنا الكبير @jjafferr DoCmd.OpenForm "employees", , , "[id]= '" & Me.id & "'" منذ ساعه, حلبي said: عند الضغط علي id في الفرعي يقوم بالمطلوب ولكن ينقل التركيز علي اول سجل في الفرعي لم ادري لماذا هل هناك حل حتي يظل التركيز علي الحقل المختار هذا لأنك تقوم بالنقر مرتين بالماوس .. قم البضغط مرة واحدة وترى انه يقوم بالتركيز كما تريد .. أو ضع الكود عند حدث النقر المزدوج .. تم تعديل مايو 27, 2019 بواسطه qathi 1
الحلبي قام بنشر مايو 27, 2019 الكاتب قام بنشر مايو 27, 2019 الاستاذ / @qathi جزاك الله خيرا دائما تقوم بمساعدتي وضعت الكود كما اشرت انت مرة عند النقر ومرة اخري عند النقر المزدوج ما زالت المشكلة قائمة يذهب التركيز علي اول سجل في الفرعي كل الاحترام والتقدير لكم 1
محمد احمد لطفى قام بنشر مايو 28, 2019 قام بنشر مايو 28, 2019 بعد التجربة الكود الاول فى حدث عند النقر ( مرة واحده ) ولكن اضغط مرتين ستجد يذهب الى الخلية المطلوبة كود أستاذ / @qathi فى حدث عند النقر (مرة واحدة ) يذهب الى الخلية المطلوبة 2
رمهان قام بنشر مايو 28, 2019 قام بنشر مايو 28, 2019 حيا الله الجميع اشارك ب 1. ممكن وضع كود الاخ محمد لطفي عند حدث الحالي للنموذج افضل ولكن سيحتاج معالجة اكثر عند وضع الموشر على سجل جديد 2. هذا كود يعمل حتى لو على سجل جديد Private Sub Form_Current() Me.Parent!id.SetFocus DoCmd.GoToRecord , , acGoTo, Me.CurrentRecord End Sub 3. يغنيك عن هذا كله استخدام نوع العرض للنموذج = نموذج مقسم split form . وهنا فقط اعمل النموذج الرئيسي واختر نوع العرض مقسم وتستطيع التحكم في مكان النموذج المنقسم عن طريق الخاصية اتجاه العرض وخصائص اخرى مثل قابلية التعديل وغيرها بالتوفيق 2 1
الحلبي قام بنشر مايو 28, 2019 الكاتب قام بنشر مايو 28, 2019 حياك الله استاذنا / @رمهان اولا كل عام وحضرتك بالف خير وصحة ثانيا الكود الذي قمتم بكتابته خطير جدا فهو يقوم بالمطلوب والعجيب ان ينشط اول سجل وينشط السجل المختار يعني سجلين منشطين اما بالنسبة للنموذج المنقسم فهو شئ غير مرئي يعني يوجد عندك نموذج ولكنه غير مرئي لو حاولت ان اعمل بحث له فليس امام نموذج احسن شئ فعلته اني جعلت مكان النموذج الفرعي مربع قائمة LIST BOX ففيه يتم عمل كل شئ حتي البحث يكون افضل اما اذا كان هناك حل جازم بان اضغط في النموذج الفرعي تظهر البيانات في الرئيسي دون تنشط اي سجل الا المختار فقط اكون شاكر اشكرك استاذي ومعلمنا / رمهان وجعله في ميزان حسناتك ولا انسي الكود الجميل للاستاذ / محمد لطفي والاستاذ QATHI 2
عبد اللطيف سلوم قام بنشر مايو 28, 2019 قام بنشر مايو 28, 2019 19 ساعات مضت, حلبي said: الاخوان صيام مقبول ان شاء الله مرفق مثال مصغر المطلوب عند الضغط في النموذج الفرعي علي اي خانة فيه تظهر نفس البيانات في الرئيسي علما بان الرئيس والفرعي لهم جدول واحد جزاكم الله خيرا الموظفين.accdb 476 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 6 downloads لاضفاء حركة على النموذج الفرعي قمت بعمل id hyperlink منظر جمالي ويسهل للمستخدم الضغط عليه الموظفين.accdb 1
الحلبي قام بنشر مايو 28, 2019 الكاتب قام بنشر مايو 28, 2019 الاستاذ/ @عبد اللطيف سلوم جزاك الله خير وبارك الله فيك 1
رمهان قام بنشر مايو 29, 2019 قام بنشر مايو 29, 2019 في ٢٨/٥/٢٠١٩ at 11:14, حلبي said: اما اذا كان هناك حل جازم بان اضغط في النموذج الفرعي تظهر البيانات في الرئيسي دون تنشط اي سجل الا المختار فقط اكون شاكر لم افهم هذا السطر .. خصوصا "دون تنشيط اي سجل " .. لو وضعت الكود عند حدث في الحالي للنموذج الفرعي فانه لايتنشط الا السجل المختار ! تحياتي
أبو إبراهيم الغامدي قام بنشر مايو 29, 2019 قام بنشر مايو 29, 2019 أهلا @حلبي الشفره التالية تفي بالغرض إن شاء الله Private Sub Form_Current() If Not NewRecord Then Parent.Bookmark = Me.Bookmark End If End Sub الموظفين.accdb 1 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.