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

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

قام بنشر

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

مثلاً فى سجل طلبة المدرسة المفروض أن عدد الطلبة 1000 طالب ولكنهم بالملف 1005 طالب

إذن يوجد عدد 5 طلبة زيادة

الواقع أنهم مكررين ولكن خاصية الفرز لن تفيد فى إيجادهم

لأن مثلاً قد تكون طابة إسمها دنيا عبدالله محمد

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

فخاصية الفرز هنا لن تجعل الإسمين متتاليان لأنهما غير متطابقتان

المطلوب فى الكود أنه يقوم بتلوين بعض الخلايا فى العمود إذا كان فى الخلايا تشابه مثلاً تكرار 10 أحرف فى الخليتين

قام بنشر

السلام عليكم

على افتراض ان العمود الذي يحتوي على الاسماء هو العمود A

ضع هذا الكود :


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

For Each cel In [A1:A1000]

If Application.WorksheetFunction.CountIf(Range("A1:A1000"), cel) > 1 Then

cel.Interior.ColorIndex = 4

Else

cel.Interior.ColorIndex = 0

End If

Next

End Sub


قام بنشر

أخى الغالى أبو حنين

للأسف لم يعمل الكود إلا عندما تطابقت البيانات المتكررة

ولكن لو إختلف إسم عن إسم بهمزة فوق أو تحت الألف أو بمسافة بين عبدالحميد و عبد الحميد لا يقوم الكود بالتلوين

المطلوب لو أمكن أن يقوم الكود بتلوين الخلايا المتشابهة ايضاً وليست المتطابقة فقط أى إذا تشابهت 10 أحرف أو 15 حرف فى خليتين يقوم الكود بتلوينهما حتى نتأكد أنهما ليسا نفس الإسم مع إختلاف طريقة الكتابة

ولك خالص الشكر

قام بنشر

أستاذي ومعلمي يوسف طبعا لم ألجا إلي دالة (countif) والتنسيق الشرطي لأن حضرتك تريد التأكد من تشابة الأسماء وليس تكرار الأسماء ففكرت في طريقة بالمعادلات لأني لن أضارع عظيم مثل أستاذي أبو حنين في الأكواد وهي إضافة هذه الصفحة للعمل وكتابة الإسم المشكوك فية للتأكد من وجودة أوصحتة من عدمة وفي النهاية محاولة علي قدي لعلها تفيد

التأكد من تواجد الأسماء.rar

قام بنشر

الفكرتان ذكيتان

ولكنهما لا يحققا المطلوب يا استاذ محمود

على كل حال مشكور على المشاركة فى الموضوع

قام بنشر

أستاذي ومعلمي يوسف توجد معادلة ( left ) في التنسيق الشرطي ممكن جعلها بدل م تبحث علي الحرف الأول نجعلها تبحث عن أي عدد من الأحرف حضرتك عايزة والهدف من الملف هي طريقة للبحث بلالة الحروف

قام بنشر

محمود بك

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

ولكنها لم تظلل إلا الخلايا المتطابقة فقط


=COUNTIF(INDEX(myrng;0;COLUMN()-1);F64726)>1

أتعشم أن ترفق لى معادلة ليفت ومنكم نستفيد يا برنس

وكل سنة ونت طيب

قام بنشر

أستاذي ومعلمي يوسف هذان ملفان الأول دالة ( left ) اللي سيادتك طلبتها بعد زيادة عدد أحرف بحثها إلي 10

والثاني دالة حضرتك تضع فيها الشرط الذي تريدها البحث عنة أو الحروف أللي حضرتك عايزها

تنسيق شرطي.rar

معادلة تلوين المكرر الذي أريدة.rar

قام بنشر

مشكور محمود بك

ولكن للأسف كل هذه المحاولات والحلول لم تسعفنى للوصول لما أريد

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

مثلاً

دنيا عبدالحميد حسني هى نفسها دينا عبد الحميد حسنى

ولكنها مرة مكتوبة دنيا ومرة مكتوبة دينا

إسم ابوها مرة مكتوب عبدالحميد بدون مسافة ومرة مكتوب عبد الحميد بمسافة

وإسم جدها مرة مكتوب حسني بنقطتان تحت الياء ومرة مكتوب حسنى بدون نقط تحت الياء

طبعاً ربما تكون هناك طالبتان دنيا ودينا وربما هما أختان وهذا لا يهم وربما هما نفس الطالبة ولكنها كتبت مرتين لأن من قرأ الإسم من الكشوف اليدوية قرأها مرة دينا ومرة دنيا

المطلوب أن يقوم الكود المطلوب بتظليل الخليتان حتى نتأكد من وضع هذه الأسماء تماماً

والأمثلة على هذه الأخطاء كثيرة

أمنية وأمينة رحمة ورحمه أميرة واميرة ندى وندا وغيرها

علماً بأن القائمة تصل عدد الاسماء فيها إلى 1500 تقريباً

ولكن قد يكون هذا الطلب من ضرب الخيال لأنى أطلب من الإيكسيل أن يستخرج خطأ يدوى وهو ليس بالضرورة خطأ

أعتذر لو كنت قد اضعت وقتكم الغالى ولكم تحياتى

قام بنشر

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

  • 2 years later...
قام بنشر

طيب اخي  مطلوب ( كود  تلوين الخلايا المتشابهة  في صف معين )

على سبيل المثال (  تلوين الخلايا التابعة للموظف احمد عبدلله  باللون الاحمر مثلاً ) حيث أن الخلايا التابعة له تبداء من العمود B  وحتى العمود  K .

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

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

Important Information