kingskull

تم التعديل على المرفق حيث اتضح لدي ان ممكن المشكلة في خاصية التحديد وحدها وخففت من الشروط في الماكرو اظن اساس المشكلة في هذا الكود ليس دقيق اي انه يحدد اكثر من نتيجة بمجرد ورودها في كلا الحقلين في اي سجل والمطلوب توافق الفرز مع التحديد UPDATE Base SET Base.ysno = true WHERE (((Base.[نوع الموافقة])=[Forms]![Base]![مربع_تحرير_وسرد110] AND (Base.[حالة الدارس])=[Forms]![Base]![مربع_تحرير_وسرد115])) Scholars_New.rar

السلام عليكم ورحمة الله وبركاته لدي نموذج به سجلات كما في الصورة ويتم فرز السجلات بمربعي تحرير وسرد الحالة الاولى اذا كلا المربيعين يحملان القيمة "الكل" تظهر جميع السجلات واذا اخترت تحديد يتم تحديد كل السجلات هذه تم عملها بنجاح الحالة الثانية اذا المربع الاول يحمل قيمة و المربع الثاني يحمل قيمه اخرى فان السجلات يتم فرزها بناءً على القيمتين بنجاح مثال المربع الاول يتم اختيار "إبتعاث" والثاني "مبتعث" فان السجلات يتم فرزها بدون مشكلة لكن عند اختيار زر تحديد الكل بحيث المفروض يحدد السجلات المفرزه بالقيمتين إبتعاث و مبتعث فإنه يحدد اي سجل يحمل القيمة إبتعاث أو مبتعث انظر الصورة الحالة الثالثة احدى المربعين يحمل القيمة "الكل" و القيمة الثانية اي قيمة أخرى يتم الفرز بنجاح ويتم التحديد بناء على نتيجة القيمة الأخرى دون مشكلة المشكلة في الحالة الثانية في خاصية التحديد بعد الفرز يحدد اي سجل يحمل ايا من القيمتين والشكر موفور لكم جميعا Scholars_New.rar

وفقك الله ابو عبدالله ممتاز جدا اسعدك الله

السادة الكرام تحية طيبة لدي مربع تحرير وسرد به قيم واريد وضعها في دالة الشرط if منشئ تعبير ماكرو اي اذا كانت احد القيم التالية فقم بالعمل التالي انا عرفت اضيف قيمه واحده ولكن عدت قيم لا اعرف الصيغة مثال [forms]![formname]![fieldname]= "محمد" اريد مع اسم محمد مثلا عدت اسماء كيف الصيغه هل هي هكذا ؟ [forms]![formname]![fieldname]= "محمد, خالد,علي" لانها لم تنجح معي اذا اضفتها بهذا الشكل وشكرا لكم

بيض الله وجهك يالغالي والاخوان جميعا

با اختصر السالفه واعذروني 🙏 عندي نموذج به سجل مستمر واريد فقط ان يتم اختيار تحديد السجلات بعد التصفيه حسب مربع تحرير وسرد طبعا كما ذكر استاذي ازهر موجود مربع التحرير انا نجحت عن طريق الماكرو عمل زر تحديد واستخراج السجلات بعد التصفيه كملف اكسل لكن لو اردت مثلا اصفي السجلات ثم عند اختيار تحديد الكل اريده يحدد الذي تم تصفيته وليس كل السجلات استخدمت دالة if في vba ولكن لم تنجح معي وهذا الكود المستخدم Private Sub cmdMark_Click() DoCmd.SetWarnings False If [Forms]![Base]![مربع_تحرير_وسرد110] = "إيفاد" & "إبتعاث" & "إجازة دراسية" & "موافقة مسائية" & "موافقة نهاية الأسبوع" & "دراسة عن بعد" Then DoCmd.ApplyFilter "", "([Base]![نوع الموافقة] = [Forms]![Base]![مربع_تحرير_وسرد110]" DoCmd.RunSQL "UPDATE Base SET Type.ysno = true" DoCmd.RunSQL "UPDATE Base SET Base.ysno = false" DoCmd.ShowAllRecords ElseIf [Forms]![Base]![مربع_تحرير_وسرد110] = "الكل" Then DoCmd.RunSQL "UPDATE Base SET Base.ysno = true" Else End If DoCmd.SetWarnings True End Sub Scholars.rar

كيف اجعل الماكرو يشغل هذا الكود لا اريد وضعه كـ vba

وفقك الله اجرب واشوف يالغالي

السلام عليكم ورحمة الله وبركاته تحية طيبة لكم جميعا هل هناك امر ماكرو لتحديد جميع السجلات بوضع علامة صح على مربع التحديد لكل السجلات في نموذج سجلات مستمر لدي كود vba لكن اود استخدام الماكرو استخدمت خيار SetproPerty واعطيت القيمة -1 لكن يحدد سجل واحد فقط مع خالص التقدير

اظن انني حللت المشكلة نسخة الجدول وحذفت الاساسي واسميته باسم الاول والان يعمل بشكل جيد لكن اخاف ان تعود نفس المشكلة

السلام عليكم ورحمة الله وبركاته اسعد الله اوقاتكم بالمسرات لدي قاعدة بيانات بها نموذج سجلات مستمر وقد اضفت فيها اكواد تصفيه حسب نوع القيمة في حقل معين وكذلك مربع اختيار وكذلك كود اعادة ترتيب الارقام حيث عند حذف سجل او اضافة سجل يعيد ترتيب السجلات لكن عند فرز البيانات او اضافة سجل يتم حذف الحقل "رقم" من الجدول وهو مضاف في الفهرسه تصاعديا ولا يمكن اعادته حيث يظهر الخطأ تم تعريف حقول كثيره Too many fields are defined لا ادري مالمشكلة بالرغم ان البرنامج كان يعمل دون مشاكل لكن بعد ما عدلت على خيارات التصفيه بحيث فقط يستخرج السجل المصفى حسب النوع والذي تم وضع علامة صح عليه على شكل اكسل ظهرت هذه المشكله Scholars.rar

تماما كما هو مطلوب بارك الله فيك وفي عملك ام عبدالله

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

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

اخي ابو خليل بيض الله وجهك هذا ما اريد يعمل الكود بصفة ممتازة اسأل الله لك التوفيق و السداد اسعدك الله في الدارين