logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
Hatem Eissa hassona229-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة اكسيل مشاريع جاهزه



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





12-07-2018 06:47 مساءً
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
السلام عليكم ورحمة الله وبركاته
من الامور المطلوبة بكثرة وهى كيفية تظليل الصف والعمود للخلية النشطة

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


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

MzE1NzEwMQ4343003
الان نبدا بالشرح:
فى دالة اسمها Row عند كتابة الدالة وفتح القوس ثم اغلاقه دون ادخال اى وسيطات تكون النتيجة رقم الصف الموجود به الدالة
ودالة اسمها Column عند كتابة الدالة وفتح القوس ثم اغلاقه دون ادخال اى وسيطات تكون النتيجة رقم العمود الموجود به الدالة

ودالة اسمها Cell تتكون من عاملين فى اول عامل نختار نوع البيانات والعامل الاخر المرجع الذى تريد استخراج البيان المختار فى العامل الاول
انواع البيانات بهذه الدالة 12 نوع وفى هذا الدرس سنتكلم فقط عن النوع row والنوع col
عند كتابة دالة Cell ونوع البيانات row وعدم ادخال وسيط بالعامل الثانى تكون النتيجة رقم الصف للخلية النشطة
وعند كتابة دالة Cell ونوع البيانات col وعدم ادخال وسيط بالعامل الثانى تكون النتيجة رقم العمود للخلية النشطة

طب ناخد مثال سريع على اللى قولتوا كدا ونلاحظ الصورة التالية:
MjIxNDUwMQ3333004
نلاحظ ان دالة Row جابتلى رقم الصف اللى هو 1 ودالة Column جابتلى رقم العمود اللى هو 2
وفجاه حمادة لاحقنى وبيقولى انت بتضحك علينا دالة Cell جايبة رقم 4 ازاى والخلية النشطه هنا الصف الخامس
وكمان اللى تحتها جابت 2 والخلية النشطة فى العمود الاول
شوف احمادة فى دالة Cell مع عدم استخدام العامل الثانى احنا ماشيين بمبدا الخلية النشطة ولكن مجرد الوقوف على الخلية لا يعد تنشيط لها
يعنى برضوا : احنا لما دخلنا المعادلة فى دالة Cell مع Row وضغط انتر هنا جابلى رقم الصف للخلية نفسها يعنى 3 بعدها انا دخلت معادلة تحتها وبكدا نشط الخلايا وبالتالى جابلى رقم الصف الخلية اللى كنت واقف عليها عند التنشيط اى الخليه اللى تحتها يعنى الصف 4 وفى نفس الوقت الدالة اللى تحتها جابتلى رقم العمود للخلية نفسها اللى هو 2

وبكدا مع حدوث اي تنشيط هتتعدل الخلايا دى الخاصه بدالة Cell وفقا للخلية النشطه
على سبيل المثال نضغك F9 أو Shift+F9 أو دبل كليك على حافة اى عمود او حافة اى صف او الضغط على Ctrl+z الى اخره من الاوامر التى تؤدى لتنشيط ورقة العمل ومع التطبيق يتضح الامر اكثر

والان دعونا نضع بعض الشروط لاداة التنسيق الشرطى ونلاحظ الصورة التالية:

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

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

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


اولا ساكتب المعادلة فى اداة التنسيق الشرطى من ... Home >> Styles >> Conditional Formatting >>New Rule كما بالصورة التالية:
MzI0NzUx006
ولا ننسى ان تكون المعادلة على كامل الشيت كما بالصورة التالية:
NDAzNzQ3MQ4444007
هنا عند استخدام معادلات تحتاج الى تنشيط مع التنسيقات فالامر يستدعى تنشيط للشاشة
وهذا هو الامر الوحيد الذى سنستخدمه فى الكود وهو اننا سنعطى امر بتنسيط الشاشه مع تحديد اى خلية ليستمر تظليل الخلايا بكفائة
لذلك سنتكب الكود التالى بحدث
SelectionChange لورقة العمل:
CODE
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

MzYzNzI2MQ3232008
وبكدا بمجرد رجوعك لورقة العمل سيتم تلوين الصف والعمود للخلية النشطة بمجرد تحديدها كما بالصورة التالية:
MTk3MjQ2MQ1818009
وطبعا عايز تظلل الصف بس أو العمود بس أو تغير اللون للصف غير العمود او تحدد النطاق المخصص للتلوين استخدم احدى المعادلات التى ذكرتها اعلاه

لتحميل ملف العمل من هنا
وهنا يكون انتهى الدرس كان معكم اخوكم فى الله اسلام عبدالله
دمتم فى حفظ الله ورعايته 81
 
 





look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 07:29 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36759
الاعجاب : 186
بارك الله فيك أخي الحبيب إسلام ومشكور على الموضوعات المميزة
لمزيد من الإفادة يمكنك الإطلاع على الرابط التالي
من هنا




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 07:54 مساءً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
عمل رائع وافكار اروع استاذى الحبيب ياسر
جزاك الله خيرا وبارك الله فيك 81




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 09:23 مساءً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36759
الاعجاب : 186
تسلم أخي الحبيب إسلام ..هذا بعض ما عندكم
تقبل وافر تقديري واحترامي




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 09:58 مساءً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 853
الجنس :
تاريخ الميلاد : 1-5-1989
الدعوات : 1
قوة السمعة : 6611
الاعجاب : 2
يمكن بكل بساطة هذا الكود
CODE

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Cells.Interior.Color = xlNone
Columns(Target.Column).Interior.ColorIndex = 35
Rows(Target.Row).Interior.ColorIndex = 35
End Sub





look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 10:03 مساءً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9685
الاعجاب : 25
شكرا لك استاذنا الكبير سليم ومنور فى هذا المنتدى الكريم
والشكر موصول لأستاذنا الكبير اسلام صاحب الطلعة الجوية الأولى-والشكر الكبير وكل الشكر لأستاذنا المحترم ياسر ابو البراء
جزاكم الله جميعا كل خير -واحسنتم
وبارك الله فى هذا المنتدى الكريم وحفظه بما يحويه من اساتذة وخبراء وعمالقة
وادام الله عليكم نعمة العلم ونور بصيرتكم وزادكم الله من علمه



توقيع :ali mohamed ali


{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
الاخرين لوجه الله وان تحتسب له اجر عند الله

look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 10:30 مساءً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9685
الاعجاب : 25
ولإثراء الموضوع هذا كود ثالث
CODE
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
    Application.ScreenUpdating = False
    Cells.Interior.ColorIndex = 0
    With Target
  .EntireRow.Interior.ColorIndex = 4
  .EntireColumn.Interior.ColorIndex = 4
  End With
  Application.ScreenUpdating = True
End Sub




أثارت هذه المشاركة إعجاب: Ely saleh،


توقيع :ali mohamed ali


{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
الاخرين لوجه الله وان تحتسب له اجر عند الله

look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 10:50 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
مشكور لاضافاتكم الرائعه استاذ على واستاذ سليم
لكن القصد من هذا الموضوع هو تحديد الخلايا للرؤيه فقط وليس تغيرها جذريا
حيث ان استخدام الاكواد يغير التنسيق بشكل كامل ونهائى
واستاذى الغالى ياسر فهم القصد وعليه وضع موضوع مشابه
وجزاكم الله خيرا على تفاعلكم المثمر
تقبلوا وافر احترامى وتقديرى 81




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  12-07-2018 11:48 مساءً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 853
الجنس :
تاريخ الميلاد : 1-5-1989
الدعوات : 1
قوة السمعة : 6611
الاعجاب : 2
المشاركة الأصلية كتبت بواسطة: Eslam Abdullah مشكور لاضافاتكم الرائعه استاذ على واستاذ سليم
لكن القصد من هذا الموضوع هو تحديد الخلايا للرؤيه فقط وليس تغيرها جزريا
حيث ان استخدام الاكواد يغير التنسيق بشكل كامل ونهائى
واستاذى الغالى ياسر فهم القصد وعليه وضع موضوع مشابه
وجزاكم الله خيرا على تفاعلكم المثمر
تقبلوا وافر احترامى وتقديرى 81
بعد اذنك استاذ اسلام الخلايا لا تتغير جذريا لان عبارة xlno في الكود تعيدها الى اصلها
هلا جربت الكود بنفسك من فضلك




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  13-07-2018 12:31 صباحاً   [9]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
اخى الكريم سليم استخدام الاكواد فى هذا الامر كثير ولكن كما قلت التغيير هنا جذرى
وعفوا استخدام الكلمة xlNone لا يرجع شئ لاصله !!!
بل هى كلمة محجوزه مثلها مثل vbblue أو vbred كل منهم يعكس رقم محدد
وباختصار شديد فما تعكسه الكلمة xlNone هو NoColor أى لا لون
وبما ان ورقة العمل من الاساس التى اختبرت فيها الكود الخاص بك فارغ فمؤكد لم تلاحظ الامر
لكن جرب وضع اى لون اخر وقم بتجربة الكود وسيتضح الامر




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  13-07-2018 06:08 صباحاً   [10]
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 853
الجنس :
تاريخ الميلاد : 1-5-1989
الدعوات : 1
قوة السمعة : 6611
الاعجاب : 2
المشاركة الأصلية كتبت بواسطة: Eslam Abdullah اخى الكريم سليم استخدام الاكواد فى هذا الامر كثير ولكن كما قلت التغيير هنا جزرى
وعفوا استخدام الكلمة xlNone لا يرجع شئ لاصله !!!
بل هى كلمة محجوزه مثلها مثل vbblue أو vbred كل منهم يعكس رقم محدد
وباختصار شديد فما تعكسه الكلمة xlNone هو NoColor أى لا لون
وبما ان ورقة العمل من الاساس التى اختبرت فيها الكود الخاص بك فارغ فمؤكد لم تلاحظ الامر
لكن جرب وضع اى لون اخر وقم بتجربة الكود وسيتضح الامر
بارك الله بك استاذ اسلام تم توضيح الامر بالنسبة لي




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  13-07-2018 06:51 مساءً   [11]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36759
الاعجاب : 186
بارك الله فيكم إخواني الكرام .. والله سعدت بهذا التفاعل المثمر والذي أتمنى أن أراه في كل الموضوعات
تقبلوا وافر تقديري واحترامي




look/images/icons/i1.gif تظليل الصف والعمود للخلية النشطة
  14-07-2018 11:36 صباحاً   [12]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-03-2018
رقم العضوية : 5025
المشاركات : 450
الجنس :
تاريخ الميلاد : 19-3-1990
قوة السمعة : 796
الاعجاب : 0
بارك الله فيكم وجزاكم الله كل خير
كلها حلول رائعة-احسنتم




اضافة رد جديد اضافة موضوع جديد
الصفحة 2 من 2 < 1 2 >




المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
كيفية الترحيل الى خلية مسماة بدل كتابة رقم الصف والعمود فى كود اليوزر فورم toytotan
6 1490 toytotan

الكلمات الدلالية
تظليل ، الصف ، والعمود ، للخلية ، النشطة ،









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

الساعة الآن 08:21 AM