نجوم المشاركات

بعد اذن اخي علي الملف مرفق محمد خاطر salim.xlsx

أهلا بك اخ كريم فى المنتدى تفضل محمد خاطر-1.xlsx

باك الله فيكم وجز اكم الله خير الجزاء وزادكم الله عالما مشكور جدا استاذ الفاضلahmedkamelelsayed0 said . استاذ سليم حاصيا تعجز الكلمات عن شكرك اطال الله عمرك وزاد الله علما تنفع بيه كل محتاج .

لا حظ هذه الصورة هذه بعد التنسيق

السلام عليكم ورحمة الله بإضافة دالة شرطية تم عمل المطلوب... بن علية حاجي MMM.xls

السلام عليكم ورحمة الله وبركاته تحية طيبه وبعد برجاء من السادة الأفاضل القائمين على هذا الصرح الكبير مساعدتى فى الآتى ولكم جزيل الشكر والتقدير 1- أريد ضرب خانة العدد فى خانة الرسم والتى تتكون من عمودين للقرش والجنية. 2- يوضع ناتج الضرب فى خانة الجملة والتى أيضا تتكون من عمودين قرش وجنيه . 3- ضرب خانة الجملة فى 15% ووضعها فى خانة الت 15% قرش وجنيه. 4- طرح خانة الجملة من خانة الـ 15% ليعطى الباقى. 5- ضرب الباقى فى خانة النسبة ليعطى المدرسة. 6- طرح الباقى من المدرسة ليعطى الإدارة . مرسل لسيادتكم مرفق وفى الختام تقبلوا أطيب المنى وأرق تحياتى محمد خاطر.xlsx

ليس هناك مجال للتخمين في اكسل من فضلك ارفع ملفاً نموذجأً عما تريدين وان شاء الله تلقى المساعدة

بعد إذن أستاذنا ومعلمنا الفاضل الأستاذ / سليم اضغط كليك يمين على الخلية أو الخلايا المراد تنسيقها واختر تنسيق خلايا من القائمة المختصرة يظهر صندوق حواري اختر منه مخصص اكتب في المستطيل الخاص بالنوع الذي هو أسفل هذه الكلمة بعدد الأرقام المطلوب إظهارها بما فيه الأصفار التي في جهة اليسار اكتب 0 بمعنى لو 20 رقم تكتب 00000000000000000000

الف شكر أخى الكريم سليم حاصبيا بارك الله فى عمركم ونفعنا بعلمكم وغفر لنا ولكم اللهم امين

السلام عليكم ورحمة الله جرب الحل التالي في الملف المرفق (العمود الملون بالأزرق)... بن علية حاجي موجود غير موجود.rar

الخلية لا تتسع الى اكثر من 16 رقم (اذا كان تنسيقها Number ) لكن في حال تنسيق Text يمكن كتابة اي شيء

قم بكتابة البيانات في الاعمدة C & D & E (في هذا المرفق الجديد) مع حرية تعديل الرقم في H6 (لكتابة نسبة مئوية يجب كتابة الرقم مقسوم على 100) مثلاً لادراج 25% نكتب 0.25 و لارداج 3% نكتب 0.03 لارداج 100% نكتب 1 وهكذا......) كلما كتبت شيئاً تظهر لك النتيجة في نفس الصف مع تغيير ما تراه مناسباً في العامود L محمد خاطر salim_shcool.xlsx

تفضل ::بالتوفق:: Test 600100k906-66.mdb

الف شكر أخى الكريم ali mohamed ali بارك الله فى عمركم ونفعنا بعلمكم وغفر لنا ولكم اللهم امين

تفضل ::بالتوفيق:: Test 600100k906.rar

تفضل معادلة جلب بيانات.xls

تفضل : تم إضافة هذا الكود في حدث عند التحميل للنموذج ID للفتح على سجل جديد If Not IsNull(Me.ID) Then DoCmd.GoToRecord , , acNewRec End If الكود التالي: على ازرار المعاينة للتقارير: مع تغيير اسم التقرير رقم 1 او 2 Dim stDocName As String DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 stDocName = "قائمة رقم 1" DoCmd.OpenReport stDocName, acViewPreview, , "MAinID=" & [ID] تم إزالة كل فلاتر ID الموجودة في استعلامات التقارير لانها لا تلزم تم تسمية حقل ID في الاستعلامات الخاصة بالتقارير الى MainID كي يتم التمييز عند استخدام الكود السابق للفلترة هذا البرنامج: مرفوع على الميديا فير رابط برنامج مركز الصحة

استخدم هذا بعد تحديث الكمية DoCmd.GoToRecord , , acNewRec Me.prodno.SetFocus

الموضوع في المنتدى عموماً تفضل المثال المرفق في نفس الموضوع Search.zip

هل تم إجاد الحل

الكود واضح اخي CommandBars("Property Sheet").Enabled = True

https://www.officena.net/ib/topic/85048-بحث-ملون-الحروف-والخلفية/ راجع هذا الموضوع

مشكور جزاك الله خيراً

تمام استاذ صلاح من فضلك ارفع الملف الذى تضع فيه هذه المعادلة كى ترى ما هى المشكلة ؟

بعد افراغ الجداول من البيانات استخدم ضغط واصلاح قاعدة البيانات وستعود الارقام تبدأ العد من جديد ::بالتوفيق::

وعليكم السلام استاذ ياسر من فضلك قم برفع الملف الذى تعمل عليه-حتى تتمكن الأساتذة من مساعدتك بارك الله فيك

وعليكم السلام ورحمة الله وبركاتة تفضل انظر المرفق ::بالتوفيق:: برنامج حضور k906وانصراف.rar

وعليكم السلام ورحمة الله وبركاتة طريقتك خطأ في وضع اسم بالجدول Table2 غير حقل الاسم الى رقم م اربطه مع الحقل id بالجدول Table1 و استخدم نفس الكود الذي بمربع التحرير والسرد id2 ::بالتوفيق::

السلام عليكم جزاكم الله خيرا استاذ علي محمد المحترم معادلات روعه وفقكم الله لكن هل يمكن اضافة شرطين اخرين للشرطين الموجودة بالمعادلة ليصبحو اربعة شروط وهي ان نستدعي اسماء طلبة الفصل الثاني لهذا العام الذي يتكون من الطلبة الناجحون من الفصل الاول والراسبون في الفصل الثاني عدلت بالمعادلة واضفت شرطين اخرين لكن تظهر الخلية فارغة جزاكم الله خيرا -1البيانات.xlsx

لك جزيل الشكر استاذي العزيز بس لو تكرمة ممكن يكون تجميع الملفات بشكل عمودي مثل الطريقه المعموله في الفيديو في اول الموضوع

ويبارك فى الجميع

اليك هذا Dim rst As DAO.Recordset Set rst = Me.RecordsetClone rst.MoveLast: rst.MoveFirst RC = rst.RecordCount If Me.CurrentRecord < RC Then DoCmd.GoToRecord , , acNext End If

أخويّ الكريمين حسام وعبد العزيز السلام عليكم ورحمة الله وبركاته أشكركما جزيلاً على إبدائكما إعجابكما بما أقول ...هذا من كرم أخلاقكما . لكنني يا أخويّ الكريمين بعد أن اطلعت على بعض أعمال أخينا الذي افتقدناه جسداً وبقية أعماله شاهدة على نبله وكرمه عماد الدين الحسامي أدعو الله أن يتغمده برحمته...تحسرت لأنني لم أكن أعرفه رأيت هندسة بارعة في التصميم ووقوفاً في صف المظلومين ..كأنه أدخل هندسة الديكور في قوالب تصميم(نظام الحسامي للمخازن) يا ليتني كنت في زمن مشاركاته ولو لفترة محدودة...كنت تشرفت بهذا العلم الذي طالته يد المنون ولا أقول إلا ما يرضي ربنا. لا حول ولا قوة إلا بالله العلي العظيم...إنا لله وإنا إليه راجعون ...والسلام عليكم.

الأخ الفاضل شكيب (بالمناسبة يعني ايه شكيب) تسهيلاً عليك قمت بتجميع حلول الأخ الحبيب والأستاذ الكبير بن عليه في المرفق 4 أوراق عمل الورقة الأولى والثانية بالأكواد ، والثالثة بمعادلات الصفيف (حل الكبير بن عليه) ، والورقة الرابعة (الرابحة) بالمعادلات لابن عليه حاجي أيضاً .. تفضل المرفق ومتنساش الدعوة تشملنا إحنا الاتنين Populate According To Number.rar