هشام شلبى

السلام عليكم =========== ضعى مرفقك وسيكون الامر سهل مع الاخوان

السلام عليكم =========== كل عام وجميع اخوانى واحبائى بخير تقبل الله منا ومنكم الصيام والقيام الاخت ضعى هذا الكود فى Workbook Private Sub Workbook_BeforePrint(Cancel As Boolean) Cells.Interior.ColorIndex = xlNone End Sub

السلام عليكم =========== تفضل المرفقان الاول مرفق وورد لما تريد والاخر شرح لطريقة العمل hh.rar hh1.rar

السلام عليكم =========== واذا كان h61 $ k61 كلاهما معا اكبر من او تساوى 1 فما الحل اذا فى p61 اعتقد انه لابد من علاقة بين h61 و k61

السلام عليكم =========== الاخ العزيز استخدم الصيغة فى الخلية Q62 =IF(J62=0;0;SUM(Q61)) ان شاء الله يكون كله تمام 2.rar

السلام عليكم =========== والله انت رائع اخى طارق كل عام والله وانت بالف صحة ولمزيد من الاستفادة هنا حل اخر project1.rar

السلام عليكم =========== ماشاء الله اخى الحبيب بن علية بارك الله فيك استاذى الحبيب ابو عبدالله دائما مدرستك ابوابها مفتوحة وهذان حلان اخران لتلافى الاخطاء الناتجة عن الاستيراد احدهما بالمعادلات والاخر بالكود Desktop.rar

السلام عليكم =========== يوجد اخطاء فى الكتابة حاول اصلاحها items.rar

السلام عليكم =========== بصراحة سمعت عنه بس الجدول الذى اعمل به منذ 5 سنوات ويعطينى النتاشج التى ترضينى هوaScTimeTables + به خاصية جميلة جدا وهى سهولة التصدير الى الاكسيل لعمل جدول بحجمه المالوف ثم طباعته

السلام عليكم =========== الاستاذة عفاف اجبتك فى المشاركة رقم6 اما بالنسبة للرابط اعتقد لا يفتح ضعى الرابط الصحيح

السلام عليكم =========== للافادة عليكى بهذا الرابط رابط الجدول المدرسى الرابط خاص بعمل جدول مدرسى على الاكسيل للاستاذ خبور خير ولكن لى ملاحظة لماذا الجدول على الاكسيل وهناك الكثير من البرامج الخاصة بالجداول والتى تعمل على التوزيع اليا بدون ادنى مجهود ولها مخرجات لا تتخيليها وكمان يمكن تصديرها على الاكسيل بشكل رائع اذا احببت الاطلاع على احداهما تحت امرك

السلام عليكم =========== اخى العزيز شاهد المرفق على استعداد لشرح الخطوات او اطلع على الرابط رابط الموضوع New مستند Microsoft Word (2).rar

السلام عليكم =========== اخى الحبي بن عليه صديق حبيب فى الاكسيل استاذ فى الوررد بارك الله فيك اخى الحبيب وكل عام وانت وكل اسرتك بالف خير وامان

السلام عليكم =========== الله عليك يا ابو انس بوركت وبوركت يداك ولاتمام الاستفادة هذا شرح فيديو لخطوات ابو انس والشكر موصول للاخ salamaxp تنسيق مختلف لكل صفحة وورد.rar

السلام عليكم =========== اخى العزيز الا يمكنك ارفاق ملف به معادلتك حتى تتعدد الحلول والاراء وتصل باحسنهم الى الانتهاء من مشكلتك

السلام عليكم =========== اخى ولد طيبة ممكن ارسال اميلك للاخ السائل على الخاص

السلام عليكم =========== اخى الحبيب ابو عبدالله روعة هذه الاضافة على الكود بوركت وبوركت يداك

السلام عليكم =========== للفائدة هنا حل اخر يتم فيه البحث بالطريقتين بشرط ان تكون احدى الخليتين m3 & m4 فارغة taharhh.rar

السلام عليكم ========== اما حرف H ليس له معنى محددبل المعادلة التى تظهرة هى التى لها معنى وقد طلبت من المعادلة فى العمود AV ان تعلمنى بكل طالب راسب او غائب فى العمود AU بوضع علامة H له وبذلك حددنا الطالب الغائب واراسب معا بوضع حرف H فى العمود AV ثم اضفت هذا الجزء من الكود Next Rows("7:7").Select Range("E7").Activate Selection.AutoFilter Selection.AutoFilter Field:=48, Criteria1:="H" Range("B8:AV200").Select Selection.Copy Sheets("راسب وغائب").Select Range("B8").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=True, Transpose:=False Sheets("رابع").Select Application.CutCopyMode = False Selection.AutoFilter Range("B3:B7").Select Application.ScreenUpdating = True ليقوم الكود بترحيل الطلبة الى شيت راسب وغائب اما حرف " ب " فقط كنت اقوم بتجربة فى بداية العمل ولكنى لم اكملها وظل الحرف سهوا منى فهو ليس له اى قيمة

السلام عليكم ========== انا اساسا لم اضع كلمة مرور من فضلك اخى amir501 جرب مرة تانى واعلمنى بالنتيجة انا جربت اكتر من 10 مرات قبل الارفاق والان وكله تمام

السلام عليكم =========== هذه ستكون فقط البداية الى ان يكتمل الكود كما اريد سياخذ بغض الوقت شاهد المرفق الملف المرفق محمى شااهد ثم اغلق ثم غير تاريخ الجهاز وافتح مرة اخرى وراقب ما يحدث HH2.rar

السلام عليكم =========== اخى العزيز فى القريب العاجل ان شاء الله والله امس شاشة جهازى افتكرها الله واعمل الان على حهاز لاب توب ولا يسعفنى هذا النوع من الاجهزة على سرعة الانجاز طلبك فى عنيا واولى الاهتمامات

السلام عليكم =========== تفضل اخى الكريم وانا منتظر ردك HH1.rar

السلام عليكم =========== الاخamir501 اكاد اكون فاهم طلبك ممكن عمل الطلبين معا وهذا الارجح وهو0000 عند وصول التاريخ الى التاريخ المحدد فى الكود سيقوم الكود بمسح الدوال والحفظ اتوماتيكيا وقتها لا يهم موضوع قفل الملف لان الكود سيقوم بحفظ الشطل النهائى للملف وهو الحفظ بعج مسح الدوال وبذلك لا يستفيد من الملف اى شخص وذلك ما فعلته لك فى الملف الاول باضافة جملة ActiveWorkbook.Save اما موضوع القفل فسيكون الكود لايكون له قيمة لانه بمجرد الفتح عند الوصول للتاريخ المحدد سيمسح الدوال ويقفل الملف فما الاستفادة وهذا فى المرفق الثانى باضافة السطرين ActiveWorkbook.CLOSE عموما افتح الملفين وشاهدهم جيدا ثم غير تاريخ جهازك الى التاريخ المحدد بالكود وافتح مرة اخرى وراقب ما يحد فى الملفين HH1.rar HH2.rar

السلام عليكم =========== ممكن ترفق ملف به الكود ومفعل والباقى سيكون سهل ان شاء الله