mojahedxp

up

فكرة اكثر من رائعة وكالعادة تحفة من تحف الاساتذة

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

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

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

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

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

الاخ الفاضل / شفيق السلام عليكم ورحمة الله وبركاته يمكن تحقيق ذلك عند اختيار عدم تمكين وحدات الماكرو فى بداية فتح الملف عندما تظهر الرسالة التى تسال عن ذلك اما اذا لم تكن تظهر لديك رسالة فقم بفتح الملف ثم اختار قائمة ادوات ثم ماكر ثم حماية ثم اختار مستوى الحماية عالى ثم قم بالحفظ وغلق الملف ثم اعد فتحه ثانية لن يعمل الماكرو

الاخ الفاضل/ السلام عليكم ورحمة الله وبركاته افتح صفحة محرر اوامر الفيجوال بيسك الخاص بالاكسل وقم بالنقر مرتين على الصفحة التى ترغب فى وضع الامر بداخلها من القائمة التى على اليسار والتى بها اسماء جميع اوراق العمل الخاصة بك لتفتح صفحة محرر اوامر خاصة بهذه الورقة دون غيرها ضع الكود التالى فى بداية الصفحة Private Sub Worksheet_Activate() ثم ضع الاوامر البرمجية التى ترغب فيها وفى النهاية ضع الامر End Sub والسلام عليكم ورحمة الله وبركاته

الاخ الفاضل الاستاذ/ عادل جلال السلام عليكم ورحمة الله وبركاته ثم اما بعد بالنسبة للسؤال الاول فاعتقد انه يمكن عمل صفحة جديدة فى نهاية اوراق عمل الدور الاول بها ربط بدرجات واسماء الطلاب جميعهم ثم يتم فرز الطلاب حسب حالة النجاح ثم يتم حذف الطلاب الناجحين فقط وترك الراسبين ويكون فى نفس الوقت هناك ورقة ثانية تالية لهذه الورقة مصممه جاهزة بعدد مجال واسع من الطلاب ومربوطه جاهزة بحيث يكون الربط باسلوب ربط صف من الورقة الاولى وترك صفين فارغين احدهما به معادلات الدور الثانى ثم ربط صف ثانى من الورقة الاولى بصف فى الورقة الثانية وترك صفين فارغين احدهما به معادلات الدور الثانى وهكذا اما بالنسبة لحساب المجموع الكلى كما تفضلت انت وذكرت فبحاجة لوقت لكى اقوم بدراسة كيفية عمل ذلك ولكنك اثبت لى تماما ان كل جهة تعمل بصورة مختلفة تماما فلقد هاتفت رئيس الكنترول عندنا وطلبت منه شرح كيفيه حساب المجموع الكلى لدينا فافادنى بما يلى 1 - اذا كان المجموع فى الدور الاول اقل من 140 ونجح الطالب فى جميع المواد يحصل على 140 فقط ( كما ذكرت انت فى اولا ) 2- اذا كان المجموع فى الدور الاول اكبر من 140 فلا يتغير المجموع على الاطلاق مهما نجح الطالب فى مواد الرسوب ويكتفى بنجاحه فى المواد الدرسية المختلفة

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

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

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

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

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

الاخ والاستاذ الفاضل /عمر الحسينى (ابو تامر) السلام عليكم ورحمة الله وبركاته بارك الله فيك وجزاك خير الجزاء على تعاونك الصادق معنا فان موضوع الشق الاول وهو الخاص بتسمية الملف باسم 1 ثم عند ادخال تعديلات جوهرية تسميه باسم 2 وهكذا فيشرفنى ان ابلغك اننى استخدم نفس الطريقة تماما فهى طريقة ناجحة للغاية فى حفظ كل مرحلة من العمل حتى لا تتداخل الافكار ويسير العمل بطريقة سلسة وبذلك انت لم تطل على بل على العكس لقد اسعدتنى عندما اعطيتنى خطاب صلاحية مطلقة لتلك الطريقة التى كنت اعمل بها وبالفعل كان يوجد عندى للملف الواحد اكثر من عشرة او عشرون نسخة كل منها يحتوى على تعديلات معينة وكنت اعتقد فى نفسى اننى بهذه الطريقة بدائى للغاية ومستوى طفولى مبتدئ اما الان فانا افتخر ان احد عملاقة هذا المنتدى يستخدمونها فلا اطالة فى اعطاء شهادة صلاحية الجودة يا استاذى الفاضل اما بالنسبة للجزء الخاص بوجود خطا فى الموديول الاول فكما ابلغتك مسبقا فانا لم افهمه اصلا حتى افهم ان هناك خطأ ما به فانا لم اتعلم بعد كيف ارى الصواب او افهمه كى استطيع تمييز الخطا منه وفى النهاية فى انتظار موضوع الشرح اليس انا الان من قام بالاطالة عليك جزاك الله خير الجزاء والسلام عليكم ورحمة الله وبركاته

الاخ والاستاذ الفاضل /عمر الحسينى (ابو تامر) السلام عليكم ورحمة الله وبركاته لم اشاهد اجمل ولا اروع من هذا العمل بالفعل انا اعتبر ان هذه هى احدى ابداعاتك الفنية التى تستحق ان توضع فى معرض عام ليتعلم منها القاصى والدانى الاستاذ الفاضل اسمح لى فى المديول الثانى Sub ClearAll() Application.ScreenUpdating = False With Sheets("memo2") r = 5 For x = 1 To 60 Range(.Cells(r, 1), .Cells(r + 34, 5)).ClearContents Range(.Cells(r, 8), .Cells(r + 34, 12)).ClearContents r = r + 42 هنا هنا هنا هنا هنا هنا هنا هنا هنا هنا هنا Next x End With Application.Goto [A1] End Su قمت انا بحذف سطرين منه فى موضع كلمة هنا ولم تتغير النتيجة والمسح يعمل جيدا فهل لمبتدئ مثلى ان يتعلم هل اخطأ بحذف هذين السطرين ام ان هناك مالا تراه نظرتى المتواضعة اما بالنسبة للموديول الاول فهل اطمع فى ملف ((((( وورد WORD )))))) يشرحه لى بالتفصيل حيث وبصراحة شديدة لا افهم منه حرفا واحدا وانا لا سمح الله لا اقول انه لا يعمل انه ممتاز ولكن احب ان اتعلم كيف تم وما هو المقصود بكل حرف فيه ولماذا هذا الحرف بالذات دون غيره من الحروف اعلم اننى اثقل عليك بطلبى هذا وانه سيتغرق منك اضعاف اضعاف الوقت الذى استغرقه عمل الملف نفسه ولكنى اتعشم فيك خيرا ان تعلمنا قليلا مما علمك الله عز وجل واتمنى ان يجازيك الله من عنده خير الجزاء على ذلك ملاحظة مارايك ان سمح وقتك بالمشاركة فى هذه المشاركة http://www.officena.net/ib/index.php?showtopic=15360 ام اننى هكذا تجاوزت حدودى على العموم فى جميع الاحوال جزاك الله خير جزاء وبارك فيك

الاخ والاستاذ الفاضل /عمر الحسينى (ابو تامر) السلام عليكم ورحمة الله وبركاته جزاك الله خير الجزاء فبعد رؤيه اوليه للمرفق تبين انه وباذن الله عز وجل يحقق المطلوب بنسبه 100% وامتياز مع مرتبه الشرف الاولى بلا منازع لذا اشكرك شكرا جزيلا على مجهودك وتعبك معى واعتقد ان تغيير عنوان الموضع هو انسب عنوان اخترته انت فشكرا مرة ثانية وبالطبع بعد اذنك سيكون لى بعد دراسة الاكواد والمعادلات بعض الاسئلة فارجوا الاتمانع وان تسمح ظروفك ووقتك بالاجابة عليها وشكرا مرة ثانية والسلام عليكم ورحمة الله وبركاته

سبحان الله وبحمده سبحان الله العظيم

انا اوافق وبشدة على هذا الاقتراح واؤيده تماما الاخ الفاضل /justice ما اروع كلمات توقيعك ولكن هناك حرف ناقص فى كلمه(( وبحمده ))هكذا اعتقد والله تعالى اعلى واعلم

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

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

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

الاخوة الزملاء عندى استفسار بسيط فى ظاهرة اتعبنى كثيرا فى باطنة داخل محرر اوامر الفيجوال بيسك عندما اقوم بتحديد نطاق معين اكتب على سبيل المثال rang(a1:a10).copy فيقوم بنسخ هذا المدى فى الحافظة ولكن ما العمل اذا كانت الخليتان a1،a10 قيم متغيرة وليست ارقام خلايا واضحة بمعنى اننى ادرج هذا الامر مثلا ضمن معادلة for+next واريد ان يكون النطاق متغيرا فى كل مرة بتغير امر for+next اى ان a1،a10 تتغير قيمتها باستمرار فكيف تكون الصيغة تحديدا ارجو المساعدة

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