تحويل معادلات الجمع الي اكواد

[Mohammed Elghready]

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

 الموضوع مكرر في كل مادة يعني لو تكرم احدكم بوضع كود لاحد المواد انا اكمل ان شاء الله .... هذه دالة 

=IF(OR($H8="";$G8="");"";IF(AND($H8="غ";$G8="غ");"غ";SUM($H8;$G8)))

وهذه دالة اخري

=IF($N8="";"";IF($N8="غ";"غ";CEILING($N8*80/100;0.5)))

الشيت الرئيسي.rar

[عبدالله الصاري]

السلام عليكم   

الاستاذ محمد

مادة اللغة العربية تم تحويلها الى اكواد  ونتيجة الطالبة تم تحويلها الى كود وجميع مجموع الفصل الاول تم تجويله الى كود لكل المواد

والحقيقة المعادلات كثيرة وتحتاج الى وقت 

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

الكود للعلامة عبدالله باقشير  خفظه الله 

الشيت الرئيسي.xlsb

 

[Mohammed Elghready]

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

[عبدالله الصاري]

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

ايهما افضل واسرع ان

تكتب درجات الطالبات كلها لجميع المواد وتضعط الزر  مرة واحدة ويعطيك النتائح 

ام كلما كتبت درجة للطالبة سيشتغل الكود    ربما الكود سيشتغل الاف المرات

طبعا هذا جسب علمي  والله اعلم

اتممت لك باقي المعادلات جرب وان هناك اي خطأ او تريد اظافة فاعلمنى

الكود يتعامل مع 3000طالب , اذا عدد الطلبة لديك اقل فغير العدد في الكود حتى يكون الكود سريعا

الشيت الرئيسي.xlsb

[Mohammed Elghready]

بارك الله فيك وبارك في علمك وزادك علما ونفع بك اتعبت نفسك ربنا يجعله في ميزان حسناتك............... ولي سؤال لو سمحت كيف اتعامل مع المعادلات ان كانت من صفحات اخري

مثال : او غيرها

=IF('بيانات اساسية'!$C6="";"";'بيانات اساسية'!$C6) او =CONCATENATE(MAIN!$H$6;" ";MAIN!$K$6)

وانظر ماذا فعلت انا بناء علي توجيهاتك وقل لي رايك

الشيت &الرئيسي.rar

[عبدالله الصاري]

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

تحويل الى كود.rar

 

 

[Mohammed Elghready]

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

[عبدالله الصاري]

اتمنى لك دوام التوفيق والنجاح