بحث بيانات بشرط لون الكتابة

[تامر خليفة]

مرحبا للجميع

 

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

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

[سليم حاصبيا]

تفضل أخي تامر

الحل مرفق

red.rar

[الخالدي]

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

بارك الله بالفاضل / سليم حاصبيا

كالعادة حلول مبتكرة ومتميزة بفكرتها

واثراء للموضوع

الكود التالي لمسح الخلايا في النطاق A2:H20  وبواسطة بحث واستبدال التنسيق

Sub AL_KHALEDI()
'''مسج الخلايا ذات لون خط احمر'''
With Application.FindFormat
    .Clear
    .Font.ColorIndex = 3
        Range("A2:H20").Replace "", "", , , , , True
    .Clear
End With
End Sub

في امان الله

[تامر خليفة]

تفضل أخي تامر

الحل مرفق

اخي الفاضل الف شكر لحضرتك

ممتاز ولكن

المرفق يقوم بعمل اخفاء للاسطر وليس حذف بيبانات

الف الف الف شكر تفاعل حضرتك

[تامر خليفة]

 

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

بارك الله بالفاضل / سليم حاصبيا

كالعادة حلول مبتكرة ومتميزة بفكرتها

واثراء للموضوع

الكود التالي لمسح الخلايا في النطاق A2:H20  وبواسطة بحث واستبدال التنسيق

Sub AL_KHALEDI()
'''مسج الخلايا ذات لون خط احمر'''
With Application.FindFormat
    .Clear
    .Font.ColorIndex = 3
        Range("A2:H20").Replace "", "", , , , , True
    .Clear
End With
End Sub

في امان الله

 

اخي الفاضل لك جزيل الشكر علي مجهودك

ولكن اعذر لي جهلي

كيف يعمل الكود

هل من خلال مايكروا او بطريقة اخري

اسف علي تعب حضرتك

هل يمكن ان اراه علي مرفق

ولك جزيل الشكر

[سليم حاصبيا]

اخي 

انا كتبت الكود مخصوص حتى يخفي السطر و لا يحذفها

لانه في حال الاخفاء يمكنك التراجع.

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

hidden = true 

delete

[الخالدي]

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

جرب الماكرو في الملف المرفق

في امان الله

مسح خلايا لون الخط احمر.rar

[تامر خليفة]

 

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

جرب الماكرو في الملف المرفق

في امان الله

 

عفوا اخي الكريم

لا يعمل

[تامر خليفة]

اخي 

انا كتبت الكود مخصوص حتى يخفي السطر و لا يحذفها

لانه في حال الاخفاء يمكنك التراجع.

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

hidden = true 

delete

رائع

بسم الله ما شاء الله

عاجز عن الشكر لحضرتك

وللجميع

[تامر خليفة]

 

اخي 

انا كتبت الكود مخصوص حتى يخفي السطر و لا يحذفها

لانه في حال الاخفاء يمكنك التراجع.

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

hidden = true 

delete

رائع

بسم الله ما شاء الله

عاجز عن الشكر لحضرتك

وللجميع

 

ولكن ايضا يعيبه انه يقوم بحذف السطر بالكامل وليس مسح البيانات فقط

اسف لتعب حضرتك

[سليم حاصبيا]

اذا اردت حذف البيانات فقط أو اخفائها دون اخفاء السطر

عندي كود لهذا الأمر

سارسله لك اذا كنت تريد

لا تنس ان ترسل الملف ايضاً لمعرفة كيفية التصرف

[تامر خليفة]

اذا اردت حذف البيانات فقط أو اخفائها دون اخفاء السطر

عندي كود لهذا الأمر

سارسله لك اذا كنت تريد

لا تنس ان ترسل الملف ايضاً لمعرفة كيفية التصرف

انا فعلا اقصد حذف البيانات ولليس اخفاء او حذف السطر كله

اقصد مسح محتويات الخلايا فقط

[سليم حاصبيا]

اخي تامر 

اذاً اليك الكود الجديد

[سليم حاصبيا]

اذاً اخي تامر

اليك الكود الجديد

red1.rar