اذهب الي المحتوي
أوفيسنا

ارجو المساعدة بمعادلتين يتم تصميمهما عن طريق الكود


الردود الموصى بها

سلام الله عليكم ورحمته وبركاته

الى خبراء واعضاء منتداى العزيز والعظيم

مرفق الملف موضح به المطلوب (معادلتين عن طريق الكود لاختصار كم المعادلات الموجودة )

وجزاكم الله كل خير على كل ماتقدمونه من علم نافع .

معادلتين بالكود.rar

تم تعديل بواسطه فضل 1
رابط هذا التعليق
شارك

استاذى الكبير / بن علية

سلام الله عليكم ورحمته وبركاته

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

ربنا يخليك لنا ياحبيبى ويباركلنا فيك ودعائى لك ولجميع الاسرة بالخير واليمن والبركات .

حبيب قلبى / بن علية

للاسف ليس هذا المطلوب ولكن المطلوب بالتحديد بالنسبة للمعادلة الموجودة تحت ( عدد مواد الرسوب )

والموجودة بالخلية (10 bv )والتى تستجلب او بتحصل على قيمتها من مجموع المعادلات التى تحت اسم المواد

عربى و انجليزى وفرنساوى وعلم نفس والخ

انا اريد بالتحديد ان اعمل لهذة الخلية وهى الخلية bv10 معادلة خاصة بها ولكن بالكود واستغنى و امسح

واحذف باقى المعادلات التى تحت المواد عربى وانجليزى وغيره.

اى اختصر المعادلة الموجودة فى الخلية bv10 والتى تعتمد على اكثر من معادلة بمعادلة واحدة فقط لاغير عن طريق معادلة بالكود وحذف باقى المعادلات الاخرى التى تحت المواد ,

وطلبتها بالكود لاننى لو طلبتها معادلة عادية سوف تكون المعادلة طويلة جدا

وهكذا الحالة بالنسبة للمعادلة التى بجانبها وهى مواد لاتحسب ضمن الرسوب

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

شكرا ياحبيبى وجزاك الله كل ونورتنا وشرفتنا بمشاركتك الجميلة مثلك

تم تعديل بواسطه فضل 1
رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

 

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

 

أخوك بن علية

 

الملف المرفق : معادلتين بالكود_1.rar

  • Like 2
رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاته

استاذى الفاضل / بن علية

هذا هو المطلوب فعلا وهذا مااريده . بارك الله فيك وجزاك الله كل خير وتسلم الايادى ياحبيبى

ولكن ظهرت لى مشكلة اخرى من وجهة نظرى هى كبيرة لاننى اثناء العمل بحتاجها كثيرا

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

ب CTRL + Z لم يتم استرجاعة وهذة الخاصية هام لى جدا لاننى بستعملها كثيرا وبالذات مع هذا النوع من الشيتات .

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

( C = Choose(X, 14, 18, 22, 26, 30, 34, 38, 42, 46, 50, 54, 58

فى النهاية انا شاكر لك ياحبيبى دائما تغمرنا بأعمالك الجميلة مثلك

اجمل المنى وارق التهانى لشخصكم الكريم

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

 

أخي الكريم فضل، بالنسبة للمشكل الذي اعتبرته صعبا فهذا بإذن الله حله بسيط، يمكن تغيير الكود في حدث الورقة باستعمال الخاصية Worksheet_Calculate أو يمكن جعل تنفيذ الكود يدويا بوضعه في موديول Module وربطه بزر لتنفيذه يدويا... أما فيما يخص شرح السطر (C = Choose(X, 14, 18, 22, 26, 30, 34, 38, 42, 46, 50, 54, 58 فالأعداد المذكورة في هذه الصيغة تمثل أرقام أعمدة "المجموع" للمواد على الترتيب والتي تخصها العملية نفسها (عندما تكون "خلية عمود المجموع للمادة المختارة أصغر من قيمة الخلية من العمود نفسه من السطر 9 الثابت" أو كانت "قيمة خلية العمود الذي قبله -عمود آخر العام- أصغر من قيمة الخلية من العمود نفسه من السطر 9 أو كانت هذه الخلية تحوي حرف غ" تكون نتيجة الدالة IIF العدد 1 و 0 إذا كان غير ذلك)... والدالة CHOOSE بهذا الشكل تقوم باختيار رقم عمود المادة بالترتيب حسب قيمة X المتغير من 1 إلى 12... ثم نتائج الدالة IIF حسب المواد والشرط المذكور أعلاه يتم جمعها في متغير سمّي S والذي يُستعمل في نتيجة المعادلة في العمود BV حسب رقم الصف الذي يحدده المتغير I في الكود... أرجو أني وُفقت في الشرح.... 
 

 

أخوك بن علية

رابط هذا التعليق
شارك

استاذى الفاضل / بن علية

جزاك الله كل خير وصلت الفكرة وبارك الله فيك

تعلمنا من سيادتكم الكثير ومازلنا نتعلم

ربنا يزيدكم علما ويجعل كل ماتقدمونه من علم نافع فى ميزان حسناتكم

اكرر شكرى وامتنانى وتحياتى لسيادتكم

فى رعاية الله وامنه

سلام الله عليكم ورحمته وبركاته

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information