كل الانشطه

بارك الله فيك أستاذ

تفضل التعديل . Yamen-07-04-2026-2.rar

سلام عليكم اخي foksh شكرا على الرد ولكن لم ينفذ ما طلبته اتمنى ان ترى ان كان هناك خطا اخي hegazee اشكرك على الرد الجميل على ما طلبته لكن اريد ان اضيف اليه معلومة في العمل الدي اقوم به يوجد اكثر من جدول حوالي من 20 الى ثلاثين جدول وكل جدول يكون عدد االصفوفه حوالي 20 صف وبين جدول وجدول كذلك عدد من الصفوف اريد لكل جدول زر خاص به لاغلاق صفوفه التي يكون الرصيد يساوي 0 اتمنى ان اجد الجواب كما عملته في الحواب الاول لكن لكل جدول على حدى مرة اخرى اشكرك اخي foksh واخي hegazee على الرد وجزاكم الله خيرا وفي انتظار ردكم تقبلو مني فائق التقدير والاحترام وشكرا والسلام عليكم ورحمة الله تعالى وبركاته اغلاق الصفوف ذات الرصيد 0 (2) (1).xlsm

البيانات كلها أستاذ

هل البيانات كلها أم حقل معين ؟

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

تفضل التعديل . ووافني بالرد . Yamen-07-04-2026-1.rar

⏳ باقي من الوقت : 2 يوم حتى نهاية التحدى الثاني وللأسف نفتقر إلى المشاركات الإبداعية

أمر الطباعة يقرأ وينفذ الطباعة على ما يتم قراءته في الشاشة ( الملف ) ، ولكن قد يكون هناك فكرة ، بإزالة كافة التنسيقات أو تنسيقات محددة قبل تنفيذ أمر الطباعة ، ومن ثم اعادتها مرة أخرى - لكني اعتقد انه أمر مرهق - ما لم يكن يسبب لك مشاكل فلا داعي للغوص في هذه التجربة ورأيي قابل للخطأ ، ولكم حرية التنفيذ

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

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

استاذ مازال عند الضغط علي ايقونة يتم تلوين بيانات الموظف

جرب هذا الخيار في قبل الطباعة: Page Setup -> Sheet -> Black and white

تفضل استاذ @بلال بلال الشرح والمرفق . ووافني بالرد . Yamen-07-04-2026.rar

السلام عليكم اريد عند الضغط على الزر يتم تلوين السطر في النموذج الفرعي

جرب احذف الأقواس

اعتقد انك هنا تحاول الوصول الى قيمة عنصر موجود في النموذج ، وليس من خلال قيمة حقل داخل جدول. هل جربت كطريقة بسيطة استخدام Dlookup على سبيل المثال stDocName = "tbl_student1" & DLookup("Year_name", "tbl_basic")

لابد من مرفق كي نتعرف على طلبك .

السلام عليكم Year_name هو أحد حقول الجدول tbl_basic وأريد إستخدام محتواه بأحد النماذج فى تكوين اسم جديد من خلال الآتى Dim stDocName As String stDocName = "tbl_student1" & [Year_name] لم يفلح ما سبق ، فقمت بتغيير السطر الثانى إلى: stDocName = "tbl_student1" & [Year_name]![tbl_basic] ورغم عدم وجود خطأ فى الــ Compile لما سبق ، لكن تقابلنى عند التنفيذ هذه الرسالة : ما الخطأ فى التعبير السابق ؟

حسب ما فهمت جرب الملف التالي اغلاق الصفوف ذات الرصيد 0 (2).xlsm

فيما يتعلق بالطلب الأهم لديك ، أنصحك أولاً بضبط التنسيق للخلايا في العمود D كاملةً ، لتصبح :- ثم في الزر الذي انشأته انت في مشروعك ، استخدم الحدث التالي كمثال :- Private Sub CommandButton1_Click() Dim lastRow As Long Dim i As Long Dim diff As Double lastRow = Cells(Rows.Count, "D").End(xlUp).Row For i = 8 To lastRow diff = Cells(i, "D").Value - Cells(i, "E").Value If diff < 0 Then Cells(i, "F").Value = 0 Else Cells(i, "F").Value = diff End If Next i End Sub جرب انقر على الزر وشوف النتيجة إن كانت صحيحة في الملف المرفق .. ثم ننتقل الى الطلب الثاني .. اغلاق الصفوف ذات الرصيد 0.xlsm

جمعت الحلين في مثال واحد واضطررت لحذف كل الأكواد المتعلقة بحل الأستاذ عسل قليل الدسم مع الاعتذار لمزيد من التركيز للسائلة. تجربة صادر_05.accdb

سادة الاعضاء سلام عليكم ورحمة الله تعالى وبركاته اتمنى ان تكونوا في صحة جيدة وفي احسن حال ان شاء الله لي جدول به بيانات مثل ماهو في الملف طلبي هو اغلاق الصفوف ذات الرصيد صفر وهذا بشكلين الشكل الاول هو عمل زر عند ما اتمم البيانات مثل ما في الجدول المذكور اقوم الضغط على الزر الاغلاق فيقوم بغلق الصفوف ذات الرصيد صفر " 0 " اللي في العمود F ( هذا طلبي اللي مركز عليه ) الشكل الثاني وهو اقتراح اخي لنفس الموضوع وهو له جدولين الاول لملئ البيانات والثاني ينتقل ايه البيانات الجدول الاول عندما يكون الجدول الاول فارغ ليس به بيانات يكون الجدول الثاني كل الصفوفه مغلقة بحكم ان الارصيد بالعمود " F " تساوي كلها " 0 " وعند ملئ الجدول الاول تنتقل البيانات الى الجدول الثاني وبالتالي يفتح الصفوف التي بها رصيد اكبر من " 0 " فقط اتمنى ان يكون الشرح واضح ان شاء الله وفي انتظار ردكم تقبلو مني فائق التقدير والاحترام وشكرا والسلام عليكم ورحمة الله تعالى وبركاته اغلاق الصفوف ذات الرصيد 0.xlsm

جزاكم الله خيرا فعلا هذا ما أريد

يمكن حلها كذلك بالأكواد إذا أردتها تظهر بتنسيق كما الوقت مع أن تنسيق الوقت لا يقبل أكثر من 24 ساعة. تقرير التأخير الشهري_03.xlsx