كل الانشطه

احسنت اخي جعفر بهذة الطريقة يبقى الفورم في المقدمة دائما ويمكن وضع القيمة مباشرة في البارميتر الخامس ليكون الامر DoCmd.OpenForm "FINISHED CAED", , , , , 3 او تجاوز البارامترات وكتابة الامر DoCmd.OpenForm "FINISHED CAED", WindowMode:=3 اخونا الشايب

تم تغيير سواء خلية او مربع نص استاذنك ان الخلية لو ناتجة من معادلة (بها )معادلة يكون فيه تغيير الى اللغة العربية والعكس كذلك الاحتفاظ بجميع المعادلات والتنسيقات الاخرى كرقم او صيغة تاريخ

تريد الأسهل أم الأصعب لك ولعملك ؟؟ ممكن توضح أكثر ؟

شكرا جزيلا أخى الكريم ممكن طريقة أخرى بالكود التصفية بدلا من الاستعلام ونزيد فى المعايير كود المنتج أيضا سواء بالاستعلام أو كود التصفية جزاكم الله خيرا 10.accdb

**بسم الله الرحمن الرحيم** الأساتذة الكرام أعضاء هذا المنتدى الموقر، يطيب لنا أن نعبر عن أصدق مشاعر الامتنان والتقدير لجهودكم القيّمة التي تبذلونها في إثراء هذا المنتدى بعلمكم وخبرتكم. فما تقدمونه من إجابات وافية، ومناقشات هادفة، وتوجيهات حكيمة، ليس إلا دليلًا على سموّ أخلاقكم وحرصكم على نشر الفائدة والعلم. لا يسعنا إلا أن نشكر لكم تفانيكم في توضيح الغامض، وتبسيط المعقد، وإضاءة دروب المعرفة للجميع. جهودكم لم تكن مجرد مشاركات عابرة، بل كانت بصمات تُسهم في بناء مجتمع متعلم ومتكاتف. أسأل الله أن يجزيكم خير الجزاء على ما تقدّمونه، وأن يبارك في وقتكم وعلمكم، ويجعل أعمالكم في ميزان حسناتكم. دمتم ذخرًا لهذا الصرح، ونبراسًا يهدي الباحثين عن المعرفة. واخص بالذكر استاذي أبو جودي استاذي Foksh استاذي kkhalifa1960 استاذي ناقل تقبلوا فائق الاحترام،

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

العفو أخي الكريم .. لا تنسى إغلاق مواضيعك 😇 .

بعد التمعن بكلامك ايش المطلوب بالضبط ياريت لاتبخل بالشرح .

من وجهة نظري بعدما جربت محاولات كثيرة لنفسي أولاً ومنها حلول استاذي ومعلمي استاذ @jjafferr مايصير طلبك إلا من خلال زر من نموذج أخر مثلما سويت بأول المشاركة. لكن ممكن بجوار بعض اذا مساحة الشاشة تسمح بذلك . وممكن تتحكم في ارساء كل منهم بالكود بالفورم (FINISHED CAED TEMPLATE) تفضل الشرح والمرفق . ووافني بالرد. DDOpen2Forms-1.rar

السلام عليكم اضفت عمود اسمه EmpID_01 في جدول T2 واريد ان تنتقل له نفس اليبانات عمود EmpID اي عمود EmpID في جدول T1 بياناته تنتقل الى عمودين هما EmpID و EmpID_01 DDFinding Differences-Last.mdb

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

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

اما اذا اردت النموذج الصغير دائما في المقدمة ، افتحه بهذه الطريقة DoCmd.OpenForm "FINISHED CAED",,,,,acDialog بدلا عن DoCmd.OpenForm "FINISHED CAED",acNormal

وعليكم السلام في نهاية كودك ، وقبل الرسالة ، اكتب هذا السطر: FORMS("FINISHED CAED").setfocus FORMS("FINISHED CAED").Controls("FAL").setfocus وتقدر تختار اي كائن يصير ال التركيز عليه ، مو شرط الحقل اللي كتبته لك.

ابشر لكن عطني وقت لأني على موعد اليوم .

السلام عليكم اساتذتي الكرام لقد وجدت مشكلة في التعديل الاخير لهذا الملف خلال شهر مارس الفارط المنخرط دفع مبلغ الانخراط كاملا بتاريخ 2025/04/17 والكود يرفض اعطائه منحة او قرض ياريت معرفة سبب المشكلة وشكرا. Taher_20250515.rar

اشكر حضراتكم علي الرد السريع لكن انا ما اريده هو ان المعلم منتدب انتداب جزئي يعني هو موجود اساسي علي قوة مدرسع ومنتدب لاستكمال نصاب الحصص في مدرسه اخري يعني يعمل بالمدرستين لكن في ايام مختلفه طبعا المطلوب ان المعلم يظهر في اعداد المدرسة الاساسية عند حصر الاسماء ولا يظهر في اعداد المدرسة المنتدب لها جزئي يعني يومان من كل اسبوع مع اعلم انه بيتم عرض بيانات المدرسين في listbox

الفكره حلوه وممتازة واشكرك عليها - ولكن طلبي ياصديقي هو عند فتح النموذج الرئيسي يفتح مع بعض ويكون النموذج الصغير في الامام مثال اذا ضغطت على FINISHED CAED TEMPLATE لقتحة يفتح مع بعض FINISHED CAED ويكون FINISHED CAED في الامام نفس فكرتك

استاذ @sm44ms تفضل الشرح والمرفق وبدون أكواد . DDOpen2Forms.rar

تفضل استاذ @ahmed_204079 طلبك حسب مافهمت كل المدرسين بجدول واحد ثم بالاستعلامين والنماذج بتحصل طلبك . DDelegation.rar

اعتقدنفس هذا DD-JO_2010-1.rar

صورة توضيحية ..

كلامك سليم 100% ، ولكن هناك حل لهذه المشكلة أيضاً نستخدم هذا الكود في حدث "في الحالي - On Current" مع الكود السابق Private Sub Form_Current() Dim bVisible As Boolean bVisible = (Me.total_out <> 0) With Me.CmdM .Transparent = Not bVisible .Enabled = bVisible End With With Me.CmdL .Transparent = Not bVisible .Enabled = bVisible End With With Me.CmdB .Transparent = Not bVisible .Enabled = bVisible End With End Sub DD-JO_2010.accdb

نعم يخفي ولكن فعال كما ترى .

وعليكم السلام ورحمة الله وبركاته .. فليسمح لي أخي @kkhalifa1960 ، لم لا نستخدم الدالة "Transparent" !!!! في حدث عند الرسم ( On Paint ) للجزء ( التفاصيل - Detail ) للنموذج ، نكتب الكود التالي :- If Me.total_out = 0 Then Me.CmdM.Transparent = True Me.CmdL.Transparent = True Me.CmdB.Transparent = True Else Me.CmdM.Transparent = False Me.CmdL.Transparent = False Me.CmdB.Transparent = False End If والنتيجة في الصورة التالية :- مرفق مثال الأستاذ خليفة مشكوراً على طرحه ، مع أن الأحق بإرفاق ملف هو أخونا @jo_2010 ، حتى لا نقع في اختلاف الأفكار والتسميات .... إلخ DD-JO_2010.accdb