أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
khaled alborene Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil تنزيل ملف باستخدام الأكواد Download File Using VBA اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



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





تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة

السلام عليكم الاخوة الكرام والاساتذة الافاضل لدى سؤال وارجو المساعدة...السؤال هو انا لدى خلية وهى B3 اريد ان اكتب مثلا ر ..



15-04-2019 12:52 مساء
Omar2
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 07-02-2019
رقم العضوية : 11381
المشاركات : 54
الجنس : ذكر
تاريخ الميلاد : 11-5-1992
يتابعهم : 18
يتابعونه : 0
قوة السمعة : 61
الاعجاب : 13
 offline 

السلام عليكم الاخوة الكرام والاساتذة الافاضل لدى سؤال وارجو المساعدة...السؤال هو انا لدى خلية وهى B3 اريد ان اكتب مثلا رقم 3 فيها يقوم كود ما بتحديد"تظليل" كل الخلايا اللتى تساوى نفس قيمة B3 لكن فى العمود B ويبدأ العمل فى العمود  من الخلية b9 الى اخر البيانات والملف مرفق للتوضيح وشكرا
 
 
  المصنف1.rar   تحميل rar مرات التحميل :(7)
الحجم :(30.891) KB


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





15-04-2019 02:14 مساء
مشاهدة مشاركة منفردة [1]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1654
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 554
قوة السمعة : 17106
الاعجاب : 178
موقعي : زيارة موقعي
 Online 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
تفضل هل هذا هو طلبك
 
 
  المصنف1.zip   تحميل zip مرات التحميل :(22)
الحجم :(29.714) KB


أثارت هذه المشاركة إعجاب: ali mohamed ali، خالد ابوعوف، kby، Eslam Abdullah،


توقيع :الصقر

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



15-04-2019 05:36 مساء
مشاهدة مشاركة منفردة [2]
ali mohamed ali
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1068
الدولة : مصر
الجنس : ذكر
يتابعهم : 0
يتابعونه : 50
قوة السمعة : 4571
الاعجاب : 271
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
أحسنت استاذ حسام بارك الله فيك وجعله فى ميزان حسناتك

أثارت هذه المشاركة إعجاب: الصقر، Eslam Abdullah،


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


15-04-2019 11:34 مساء
مشاهدة مشاركة منفردة [3]
Omar2
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 07-02-2019
رقم العضوية : 11381
المشاركات : 54
الجنس : ذكر
تاريخ الميلاد : 11-5-1992
يتابعهم : 18
يتابعونه : 0
قوة السمعة : 61
الاعجاب : 13
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
المشاركة الأصلية كتبت بواسطة: الصقر
تفضل هل هذا هو طلبك

استاذ حسام اشكرك لاهتمامك بالموضوع لكن المطلوب ليس التحديد بتنسيق شرطى اقصد مثلا تحديد الخلايا اللتى قيمتها تساوى قيمة الخليةb3 اى لو b3 قيمتها4يبدأ الكود بتحديد الخلايا فى العمود b من b9 الى اخر صف به بيانات يعنى زى مايكون بضغط زر كنترول عالخلية واضغط معاه كليك شمال فيحددها لكن لكل الخلايا اللى تساوى قيمة الخلية b3 ويكون التحديد فى العمود b فقط

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




16-04-2019 07:30 صباحا
مشاهدة مشاركة منفردة [4]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1654
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 554
قوة السمعة : 17106
الاعجاب : 178
موقعي : زيارة موقعي
 Online 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
تفضل اخى الكريم حل طلبك فى الملف المرفق لا تنسانا من صالح دعائك تحياتى
 
 
  تحديد الخلايا المطابقه لقيمة خليه محدده.zip   تحميل zip مرات التحميل :(20)
الحجم :(35.029) KB


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


توقيع :الصقر

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



16-04-2019 10:03 صباحا
مشاهدة مشاركة منفردة [5]
Omar2
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 07-02-2019
رقم العضوية : 11381
المشاركات : 54
الجنس : ذكر
تاريخ الميلاد : 11-5-1992
يتابعهم : 18
يتابعونه : 0
قوة السمعة : 61
الاعجاب : 13
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
الله الله ربنا يبارك فيك يااستاذ حسام الكود روعة جزاك الله خيرا ...لكن ممكن تكون حضرتك نسيت تضعه فى الصفحة فلما ووضعته فى حدث change الصفحة اصبح يحدد بطريقة خرافية شكرا لك عملاق الاكسل استاذنا الكبير حسام الصقر لكنى اتمنى اضافة نقطة اخرى للكود وهى لو قيمة الb3 مش موجودة فى العمود b مايعطنيش خطأ يخرج من الكود

أثارت هذه المشاركة إعجاب: الصقر، Eslam Abdullah،




16-04-2019 10:13 صباحا
مشاهدة مشاركة منفردة [6]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1654
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 554
قوة السمعة : 17106
الاعجاب : 178
موقعي : زيارة موقعي
 Online 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
المشاركة الأصلية كتبت بواسطة: Omar2
الله الله ربنا يبارك فيك يااستاذ حسام الكود روعة جزاك الله خيرا ...لكن ممكن تكون حضرتك نسيت تضعه فى الصفحة فلما ووضعته فى حدث change الصفحة اصبح يحدد بطريقة خرافية شكرا لك عملاق الاكسل استاذنا الكبير حسام الصقر

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

أثارت هذه المشاركة إعجاب: Omar2، Eslam Abdullah،


توقيع :الصقر

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



16-04-2019 10:45 صباحا
مشاهدة مشاركة منفردة [7]
الصقر
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1654
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 554
قوة السمعة : 17106
الاعجاب : 178
موقعي : زيارة موقعي
 Online 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
المشاركة الأصلية كتبت بواسطة: Omar2
الله الله ربنا يبارك فيك يااستاذ حسام الكود روعة جزاك الله خيرا ...لكن ممكن تكون حضرتك نسيت تضعه فى الصفحة فلما ووضعته فى حدث change الصفحة اصبح يحدد بطريقة خرافية شكرا لك عملاق الاكسل استاذنا الكبير حسام الصقر لكنى اتمنى اضافة نقطة اخرى للكود وهى لو قيمة الb3 مش موجودة فى العمود b مايعطنيش خطأ يخرج من الكود

ضع هذا السطر بعد Next
On Error Resume Next

أثارت هذه المشاركة إعجاب: Omar2، Eslam Abdullah،


توقيع :الصقر

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



16-04-2019 04:45 مساء
مشاهدة مشاركة منفردة [8]
Omar2
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 07-02-2019
رقم العضوية : 11381
المشاركات : 54
الجنس : ذكر
تاريخ الميلاد : 11-5-1992
يتابعهم : 18
يتابعونه : 0
قوة السمعة : 61
الاعجاب : 13
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
المشاركة الأصلية كتبت بواسطة: الصقر
المشاركة الأصلية كتبت بواسطة: Omar2
الله الله ربنا يبارك فيك يااستاذ حسام الكود روعة جزاك الله خيرا ...لكن ممكن تكون حضرتك نسيت تضعه فى الصفحة فلما ووضعته فى حدث change الصفحة اصبح يحدد بطريقة خرافية شكرا لك عملاق الاكسل استاذنا الكبير حسام الصقر

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

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


أثارت هذه المشاركة إعجاب: YasserKhalil، Eslam Abdullah،




16-04-2019 07:27 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 6567
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 400
قوة السمعة : 18126
الاعجاب : 610
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
بارك الله فيك أخي الحبيب حسام وجزيت خيراً

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




09-05-2019 08:15 مساء
مشاهدة مشاركة منفردة [10]
Eslam Abdullah
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1409
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 3
يتابعونه : 73
قوة السمعة : 8742
الاعجاب : 110
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
بارك الله فيك أستاذى الغالى حسام 142





09-05-2019 10:12 مساء
مشاهدة مشاركة منفردة [11]
salim
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 356
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 14
قوة السمعة : 3029
الاعجاب : 133
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
زيادة في اثراء الموضوع 
لا حاجة للتنسيق الشرطي ولا حاجة للحلقات التكرارية على كل العامود الثاني
الدالتين   Find  و  FindNext  تضعان يديهما رأساً على الجرح   (الصف المطلوب)
 الكود المستعمل

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Target.Address = "$B$3" And Target.Count = 1 Then
Salim_Code
End If
Application.ScreenUpdating = True
End Sub
'=======================================
Sub Salim_Code()

Dim fiNd_Rg As Range
Dim Total_rg As Range
Dim source_Rg As Range
Dim lr%, R%, Fixed_Ro%

lr = Cells(Rows.Count, "B").End(xlUp).Row
If lr < 9 Then Exit Sub
Set source_Rg = Range("B9:B" & lr)
Range("b9:j" & lr).Interior.ColorIndex = xlNone

Set fiNd_Rg = source_Rg.Find(Cells(3, 2), lookat:=1)
If Not fiNd_Rg Is Nothing Then
R = fiNd_Rg.Row: Fixed_Ro = R
Do
If Total_rg Is Nothing Then
Set Total_rg = Cells(R, 2).Resize(, 9)
Else
Set Total_rg = Union(Total_rg, Cells(R, 2).Resize(, 9))
End If

Set fiNd_Rg = source_Rg.FindNext(fiNd_Rg)
R = fiNd_Rg.Row
If R = Fixed_Ro Then Exit Do
Loop
End If
If Total_rg Is Nothing Then Exit Sub
Total_rg.Interior.ColorIndex = 4

End Sub

الملف مرفق



 
 
  select_rows.rar   تحميل rar مرات التحميل :(5)
الحجم :(35.946) KB


أثارت هذه المشاركة إعجاب: ali mohamed ali، YasserKhalil، خالد ابوعوف، Omar2،




10-05-2019 12:38 مساء
مشاهدة مشاركة منفردة [12]
خالد ابوعوف
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 31-03-2019
رقم العضوية : 12203
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-7-1976
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 26
الاعجاب : 5
 offline 
look/images/icons/i1.gif تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة
السلام عليكم -  رمضان مبارك
ممكن ابقاء الصفوف باللون الاخضر فقط واخفاء البقية لتكون مسيطر على البيانات

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





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
اضافة امر فى كود تحديد كل الخلايا اللتى تكون قيمتها تساوى قيمة الخلية المحددة Omar2
11 168 Omar2
كيفية اضافة الدوائر الحمراء علي الخلايا في اكثر من 255 خلية samking
1 129 samking
اضافة تاريخ اليوم فى الخلايا احمد على
7 223 احمد على
حساب عدد الخلايا التي لا تحتوي على صفر sami872
10 190 YasserKhalil
جمع أو عد الخلايا الملونة Sum & Count Colored Cells YasserKhalil
61 4767 YasserKhalil

الكلمات الدلالية
المحددة ، الخلية ، قيمة ، تساوى ، قيمتها ، تكون ، اللتى ، الخلايا ، تحديد ،


 







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



الساعة الآن 11:41 صباحا

أعلن هنا
أعلن هنا
أعلن هنا