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

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

قام بنشر

أول سؤال

أريد طريقة تحويل مجموعة معادلات إلى كود

شرح عام لمحاولة تطبيقه على ملف للتجربة

ثانى سؤال

بخصوص التنسيق الشرطى

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

الأرقام دى بنحطها يدوى وده الطبيعى

هل يمكن أن نحدد الخلايا المرجعية التى بها الأرقام بدلاً من كتابة قيمها فى التنسيق الشرطى

زى كدة النهاية الصغرى والكبرى للمواد الدراسية فى شيت رصد الدرجات أو شيت النتيجة

أتعشم سؤالى يكون واضح

وأرجو أن أجد الرد

مشكورين على مروركم

قام بنشر (معدل)

السلام عليكم

أخي يوسف

حياك الله بالسلام

بالنسبة للسؤال الثاني

بخصوص التنسيق الشرطى

حدد الخلية الأولى التي تريد عمل التنسيق الشرطي لها

من قائمة تنسيق ...تنسيق شرطي...... الداله هي:

FORMAT>>>>>CONDITIONAL FORMATING>>>>>>FORMULA IS

واكتب الدالة التالية:

=E13>$E$12

ثم قم بنسخ الدالة لكل العمود بداية من E13 و حتى آخر العمود

على فرض أن الخليةE12 هي الخلية التي بها النهاية الصغرى للمادة

أتمنى أن أكون وضحت الأمر

تحياتي

أيسم إبراهيم

تم تعديل بواسطه aysam
قام بنشر
أول سؤال

أريد طريقة تحويل مجموعة معادلات إلى كود

أو صنع بريمج نضع المعادلة فيه تتحول إلى كود مباشرة؟؟؟ أنا لا أستبعدها على أبو تامر :wink2:

قام بنشر

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

كما قلت لكم عند أبو تامر الرهيب تجد الحلول التي لا تجدها إلا عنده

أنت يارجل كنز لا ينضب بارك الله بك معلمنا و أستاذنا أبو تامر

قام بنشر

السلام عليكم

ألف شكر أستاذ يوسف على هذا السؤال الفي المليان

ألف شكر استاذ أيسم على هذه الافادة القيمة

ألف شكر دكتور أبو تامر (( اسمح لي باضافة هذا اللقب الى اسمك أخي أبو تامر فهو أهلاً لك وأنت أهلاً له ))

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

اللهم أكرم بهذا المنتدى وأرفع شأنه

قام بنشر (معدل)

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

الاخ m_127899

شكرا اخى هذا اكثر مما نستحق

الاخ خالد القدس

شكرا لك اخى وايضا كثيرا علينا اخى

الاخ سالم شباني

كان شعارى اخى سالم سابقا و مازال

السهولة واليسر

فى هذه الحالة التى اشرت اليها

يتم تعطيل او حذف السطر التالى ( Code_wh1_1 )

من الروتين ( Private Sub Worksheet_Change ) او حذف هذا الروتين بالكامل

الخاص بالورقة المراد التعديل عليها

وها هو الروتين الاصلى

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Application.EnableEvents = False
Code_wh1_1
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
وها هو بعد حذف السطر المشار اليه
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub

ولا تكلف نفسك بحذف كل الاكواد

فنعد تشغيل الاداة مرة اخرى

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

تم تعديل بواسطه أبو تامر
قام بنشر (معدل)

الأخ العزيز الغالى أبو تامر

بارك الله فيك وأرضاك

وجعل السعادة دائماً فى مرادك

وجعلك لنا دائماً عون المحتاج

ندعو لك بالخير يا محب الخير

الأخ العزيز أيسم

الف شكر

ربنا يزيدك علم

تم تعديل بواسطه يوسف عطا
  • 5 years later...

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