الحسامي

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

السلام عليكم اخي قصي تم عمل اكواد مسح البيانات واخفاء واظهار السري والفرز حسب النوع --------------------------------- بالنسبة لشيت اخر العام فالشيت كامل يعتمد على على الخلية m1 واذا أردتم التغيير ان يتم القراءة حسب رقم الجلوس فيجب تغيير مبدأ جلب البيانات وهي معمولة بالمعادلات وللاسف ليست مجالي التعامل بالمعادلات اذا تم ذلك ... فالاعتماد على رقم الجلوس وتغير الخلية من m1 الى j2 يصبح اسهل بالنسبة لي واعتقد ان هناك خطأ في البطاقات حيث يتم طباعة نتيجة الامتحان الاول وليس النتيجة النهائية فتحقق من ذلك --------------------------------- اما بالنسبة للواجهة مبدئاً قم بتغير الكود من داخل الفورم واستبدل اسم المستخدم وكلمة المرور وساعمل على عمل لائحة باسماء المستخدمين وكلمات المرور If TextBox1.Value = "hosami" And TextBox2.Value = 123 Then ----------------------------------- اما رسالة شيت اخر العام فيقوم الكود بعد الطلاب في الشيت الرئيسي ومن ثم اذا كان الرقم اكبر من عدد الطلاب او اقل من العدد1 وهو الحد الادنى للطلاب فتظهر الرسالة بان الرقم ليس من ضمن عدد الطلاب مشروع كنترول 12.rar

السلام عليكم اخي قصي هنا تم عمل الواجهة وعند فتح الملف يتم الدخول الى الصفحة الرئيسية مهما كانت الصفحة التي تم تخزين الملف بها وكذلك في شيت اخر العام عند ادخال رقم لا يشمل ارقام الطلاب اي عند ادخال رقم اقل من 1 او ادخال رقم اكبر من رقم اخر طالب لا يتم التنفيذ مع خروج رسالة بذلك مشروع كنترول 10.rar

السلام عليكم اخي قصي هنا المرفق فيه المطلوب من المشاركة رقم 86 بالنسبة لشيت الطباعة اخي ايسم هذه كما قلت هي بداية وبالنسبة لادخال مستخدم جديد فقد تم التعديل وكان فقط خطأ مطبعي لا اكثر وهنا مرفق بعد التعديل اما حذف مستخدم قديم فكلامك صحيح وانشاء الله سنعمل على ذلك اخي الخالدي اهلا وسهلا بك مشروع كنترول 8 معدل.rar مشروع جديد.rar

السلام عليكم اخي كيماس المبرمج عادة هو من يقوم بوضع خوارزمية البرنامج المراد عمله اي فكرة تنفيذ البرنامج هو من يضعها ووضع فكرة التنفيذ تمثل ثلثي عمل البرنامج وتنفيذه يشكل الجزء المتبقي اما متى نختار ادوات البرمجة فتكون حسب طبيعة البرنامج او بالتحديد حسب المطلوب تنفيذه اي لا يوجد هناك ادوات قياسية لمواضيع محددة في البرمجة وكذلك ممكن في بعض الاحيان حل مشكلة ما باستخدام اكثر من طريقة وباكثر من اداة مستخدمة عسن ان اكون قد اوصلت الفكرة بالصورة الصحيحة اخي نوران تم تنزيل ملفات جديدة بالامس فقط وهي تعمل 100 % وهي في المشاركة رقم 75

السلام عليكم الاخوة الاعزاء هنا بداية مشروع لعمل كنترول ابتدائي جديد... لم ينجز منه إلا القليل ------ فكرة البرنامج : - يكون أدخال بيانات المدرسة وبيانات الطالب وعلامات الفصول على صفحات مستقلة " عمليات ادخال بدون معالجة بيانات " - تعبئ القوائم المطلوبة فقط عند طلب القوائم واسترداد البيانات اي مبدا البرنامج : ادخال البيانات ومعالجتها فقط عند طلبها اي لن يكون بداخل البرنامج الا المعلومات الخام من بيانات الطلاب وعلاماتهم فقط الملف لم ينجز منه الا القليل القليل ولكن وددت مشاركتكم فكرته وانتم الاعلم مني بعمل الكنترولات وسنكمله خطوة خطوة انشاء الله -اخي ايسم ابراهيم لقد ادخلت على هذا البرنامج صلاحيات للمستخدمين وواجهة باستخدام الاكسل فقط وارجو منك التكرم بمراجعة الملف وتجربته من حيث آلية عمله "كونه اول برنامج لي على صلاحيات المستخدمين " مشروع جديد.rar

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

السلام عليكم ارفق لكم ملفات الموضوع كاملة بعد مشكلة المرفقات التي حدثت في المنتدى HOSAMI IF THEN.rar if then else.rar if then else(hosami).rar if then elseIF....المتعددة والمتشابكة.rar case ...statment.rar choose ...statment.rar switch ...statment.rar الجمل الشرطية كاملة (الحسامي).rar

السلام عليكم ارفق لكم ملفات الموضوع كاملة بعد مشكلة المرفقات التي حدثت في المنتدى hosami range.rar الخلايا..كامل ...hosami.rar

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

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

السلام عليكم شاهد اخي المرفق يحيى حسين 1.rar

السلام عليكم لاثراء الموضوع كمان واجهة برنامج جديدة اخوكم عماد الحسامي واجهة برنامج...hosami.rar

السلام عليكم اخي الكريم جملة الخروج من حلقة اللوب for id exit for ويتم وضعها بعد أخر سطر من تحقيق الشرط For i = 2 To addrows If Sheets(2).Cells(2, 5).Value = Sheets(1).Cells(i, 5).Value Then If Quantity - Sheets("add").Cells(i, 7).Value >= 0 Then Value = Value + Sheets("add").Cells(i, 7).Value * Sheets("add").Cells(i, 8).Value Quantity = Quantity - Sheets(1).Cells(i, 7).Value Sheets("add").Cells(i, 7).ClearContents ' هذا هو أخر سطر في تحقيق الشرط Exit For ' هنا يتم الخروج من حلقة اللوب Value = Value + Quantity * Sheets("add").Cells(i, 8).Value Sheets("add").Cells(i, 7).Value = Sheets("add").Cells(i, 7).Value - Quantity End If End If Sheets(2).Cells(2, 10).Value = Value Next i

السلام عليكم اخي الحبيب هشام حلول اكثر من رائعة بارك الله فيك ولاثراء الموضوع هذا حل أخر بالاكواد الجمع بين تاريخيين.rar

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

السلام عليكم هذا الملف القديم الذي تم مسحه سابقا وعذرا على التاخير بسبب ضيق الوقت وانا لم انسى هذا الموضوع ولكن الملف الاخر لم يجهز بعد اخوكم عماد الحسامي مشروع كنترول99.rar

السلام عليكم تفضل اخي مرفق ملف عسى من الله ان يكون المطلوب درجات المهارات.rar

السلام عليكم تفضل أخي الكريم الرفق وبه المطلوب انشاء الله تقريب.rar

السلام عليكم نعم اخي العزيز هشام الكودان يعطينان نفس النتيجةويحملان نفس المبدأ لكن يجب التفريق ما بين activecel وما بين target وهما متشابهان الى درجة كبيرة جدا ولكن في البعض البرامج انت ملزم باختار احدهما بالتحديد target هي الخلية المختارة اي التي نقوم بأختيارها أما Activecell هي الخلية النشطة أي التى يكون المؤشر عليها فمثلا عند استخدام الاكواد في حالة Worksheet_Change activecell هي الخلية التالية بعد الضغط على Enter وليست الخلية المختارة بعكس Target تبقى الخلية نفسها حتى بعد الضغط على Enter وللمشاركة معكم هنا ملف بسيط يعطي الناجح لون والراسب لون اخر تلوين خلية.rar

السلام عليكم موضوع مهم وارجو التوفيق للجميع وحلول اكثر من رائعة ولاثراء الموضوع هذا كود مسح الخلايا If IsEmpty(Target.Cells) Then Target.Interior.ColorIndex = 0

السلام عليكم اخي الكريم التاخير الذي حدث كان بسبب المشكلة التقنية التي حدثت في المنتدى وهذا ملف يوجد به المطلوب ان شاء الله New Microsoft Excel Worksheet.rar

السلام عليكم اخي العزيز عادل حنفي موضوع اكثر من رائع وسيستفيد منه الجميع ان شاء الله جعله الله في ميزان حساناتك وبارك الله فيك اخوك عماد الحسامي

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

السلام عليكم اخي العزيز والحبيب الخالدي كل يوم تثبت لنا انك عالم كبير في مجال المعادلات الصعبة فبارك الله فيك وجزاك الله خيرا وهنا لاثراء الموضوع حل اخر باستخدام الاكواد البرنامج11.rar