نقل التركيز على حقل داخل نموذج فرعي

[Ahmed.IQ]

السلام عليكم ,,

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

[محمد أبوعبدالله]

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

        Me.SubForm.SetFocus
        Set rst = Me.SubForm.Form.RecordsetClone
        rst.FindFirst "[item] = " & Forms!FormMin!txt_item
        Me.SubForm.Form.Bookmark = rst.Bookmark
        Set rst = Nothing
        Me.SubForm.Form!Quantity.SetFocus

وان وجدت صعوبة في التطبيق ارفق مثال

تحياتي

[Ahmed.IQ]

شكرا اخي الكريم ,

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

6 ساعات مضت, محمد أبوعبدالله said:

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

        Me.SubForm.SetFocus
        Set rst = Me.SubForm.Form.RecordsetClone
        rst.FindFirst "[item] = " & Forms!FormMin!txt_item
        Me.SubForm.Form.Bookmark = rst.Bookmark
        Set rst = Nothing
        Me.SubForm.Form!Quantity.SetFocus

وان وجدت صعوبة في التطبيق ارفق مثال

تحياتي

 

New Microsoft Access Database (2).accdb

[محمد أبوعبدالله]

5 ساعات مضت, Ahmed.IQ said:

لكن لم استطيع معرفة الخلل

حقل item نوعه نص لذلك يجب تعديل الكود ليكون بالشكل التالي

        Dim rst As DAO.Recordset
        Me.SubForm.SetFocus
        Set rst = Me.SubForm.Form.RecordsetClone
        rst.FindFirst "[item] ='" & Forms!FormMin!txt_item & "'"
        Me.SubForm.Form.Bookmark = rst.Bookmark
        Set rst = Nothing
        Me.SubForm.Form!Quantity.SetFocus

New Microsoft Access Database (2).rar

تحياتي

[Ahmed.IQ]

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