Note: The other languages of the website are Google-translated. Back to English

كيفية تصفية الخلايا بأحرف غامقة في Excel؟

يمكنك تطبيق نمط الخط الغامق لتنسيق البيانات أو المحتويات في الخلايا في Excel ، ولكن هل تعرف كيفية تصفية الخلايا حسب الخلايا التي تحتوي على نمط الخط الغامق في Excel؟ تجمع هذه المقالة عدة وحدات ماكرو VBA صعبة لتصفية الخلايا بأحرف غامقة في Excel.

تصفية الخلايا الغامقة مع العمود المساعد
تصفية الخلايا الغامقة برمز VBA
تصفية الخلايا الجريئة بسهولة باستخدام أداة مذهلة
المزيد من البرامج التعليمية لتصفية البيانات ...


تصفية الخلايا الغامقة مع عمود التعليمات

لنفترض أنك بحاجة إلى تصفية جميع الخلايا الغامقة في العمود B كما هو موضح أدناه ، يرجى القيام بما يلي:

تساعد الوظيفة المعرّفة من قبل المستخدم أدناه على تحديد ما إذا كانت إحدى الخلايا في عمود غامقة أم لا ، ثم إرجاع النتائج بصيغة TRUE أو False في عمود المساعد. يمكنك تصفية جميع نتائج TRUE لعرض الخلايا الغامقة فقط في العمود B.

1. اضغط على قديم + F11 مفاتيح لفتح Microsoft Visual Basic للتطبيق نافذة.

2. في ال Microsoft Visual Basic للتطبيق الإطار، انقر فوق إدراج > وحدة، ثم انسخ كود فبا التالي في نافذة الوحدة النمطية. انظر لقطة الشاشة:

كود فبا: تصفية الخلايا بأحرف غامقة

Function IsBold(rCell As Range)
IsBold = rCell.Font.Bold
End Function

3. اضغط على قديم + Q مفاتيح لإغلاق نافذة التعليمات البرمجية.

4. حدد خلية فارغة مجاورة للجدول (يجب أن توجد الخلية المحددة في نفس الصف من الصف الأول في جدول التصفية) ، وانسخ الصيغة أدناه إليها واضغط على الزر أدخل الرئيسية.

= IsBold (B2)

5. استمر في تحديد خلية النتيجة الأولى ، واسحب مقبض التعبئة للحصول على جميع النتائج. انظر لقطة الشاشة:

6. حدد رأس عمود المساعد ، انقر فوق البيانات > منقي. انقر فوق زر السهم بجانب خلية الرأس ، وتحقق من الحقيقة مربع فقط ، ثم انقر فوق حسنا.

الآن يتم تصفية جميع الخلايا الغامقة في العمود B كما هو موضح أدناه.


قم بتصفية الخلايا الغامقة في عمود بسرعة بعدة نقرات في Excel:

تصفية الخلايا الجريئة فائدة كوتولس ل إكسيل يمكن أن تساعدك على تصفية جميع الخلايا الغامقة بسرعة في عمود معين بنقرات عديدة كما هو موضح أدناه العرض التوضيحي.
قم بتنزيل الميزة الكاملة 30درب مجاني ليوم من Kutools for Excel الآن!


تصفية الخلايا الغامقة برمز VBA

يسمح لك رمز VBA أدناه بتصفية جميع الخلايا الغامقة في عمود واحد مباشرة. الرجاء القيام بما يلي.

1. حدد نطاق العمود الذي ستقوم بتصفية جميع الخلايا الغامقة باستثناء خلية الرأس. في هذه الحالة ، حدد B2: B16.

2. اضغط على قديم + F11 مفاتيح لفتح Microsoft Visual Basic للتطبيق نافذة.

3. في ال Microsoft Visual Basic للتطبيق الإطار، انقر فوق إدراج > وحدة، ثم انسخ والصق رمز فبا التالي في نافذة الوحدة النمطية.

كود فبا: تصفية الخلايا الغامقة في عمود

Sub FilterBold()
'Updated by Extendoffice 20191018
Dim cell As Range
For Each cell In Selection
If cell.Font.Bold = False Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub

4. اضغط على F5 مفتاح لتشغيل هذا الماكرو. ثم يتم تصفية جميع الخلايا الغامقة في نطاق العمود المحدد على الفور.


تصفية الخلايا الجريئة بسهولة باستخدام أداة مذهلة

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

قبل التطبيق كوتولس ل إكسيلالرجاء قم بتنزيله وتثبيته أولاً.

1. حدد نطاق العمود الذي ستقوم بتصفية الخلايا الغامقة ، انقر فوق كوتولس بلس> مرشح خاص > تصفية جريئة لإنجازها. انظر أدناه التجريبي:

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


مقالات ذات صلة

تصفية أعمدة متعددة في وقت واحد في Excel
بعد تصفية عمود واحد باستخدام ميزة التصفية ، يمكن تطبيق معايير "و" فقط على أكثر من عمود واحد. في هذه الحالة ، كيف يمكنك تطبيق معيار "AND" و "OR" لتصفية عدة أعمدة في وقت واحد في ورقة عمل Excel؟ يمكن للطرق في هذه المقالة أن تقدم لك معروفًا.

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

الصق تخطي الخلايا والصفوف المخفية / المصفاة في Excel
على سبيل المثال ، لقد قمت بتصفية جدول في Excel ، ولكنك الآن تحتاج إلى نسخ نطاق ولصقه في هذا الجدول المصفاة ، هل تعرف كيفية لصق تخطي الخلايا والصفوف المخفية / المصفاة؟ يمكن أن تساعدك عدة طرق سهلة في هذه المقالة.

تصفية الصفوف بناءً على تحديد قائمة في ورقة أخرى
في Excel ، عادةً ما نقوم بتصفية الصفوف بناءً على المعايير ، ولكن إذا كانت هناك قائمتان ، واحدة في الورقة 1 والأخرى في الورقة 2 ، فهل لديك أي حيل لتصفية الصفوف بسرعة في الورقة 1 استنادًا إلى القائمة الموجودة في الورقة 2؟ تقدم هذه المقالة هنا طرقًا لحل هذه الوظيفة.

قم بتصفية جميع البيانات ذات الصلة من الخلايا المدمجة في Excel
لنفترض أن هناك عمودًا من الخلايا المدمجة في نطاق بياناتك ، والآن ، تحتاج إلى تصفية هذا العمود بخلايا مدمجة لإظهار جميع الصفوف المرتبطة بكل خلية مدمجة كما هو موضح في لقطات الشاشة التالية. في Excel ، تتيح لك ميزة التصفية تصفية العنصر الأول فقط المرتبط بالخلايا المدمجة ، في هذه المقالة ، نتحدث عن كيفية تصفية جميع البيانات ذات الصلة من الخلايا المدمجة في Excel.

المزيد من البرامج التعليمية لتصفية البيانات ...


أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (15)
تقييم شنومك من شنومكس · تصنيفات 1
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أفترض أن العمود A هو العمود المرجعي بخلايا غامقة. أقوم بإنشاء اسم "Bold؟" بالإشارة إلى ما يلي = GET.CELL (20، OFFSET (INDIRECT ("A1")، ROW () - 1,0،XNUMX)) في العمود B ، اكتب: = Bold؟ انسخ الصيغة ثم استخدم التصفية التلقائية لتصفية القيمة TRUE. انتهى
تم تصغير هذا التعليق بواسطة المشرف على الموقع
Cadafi .... هذا رائع ... أتساءل كيف يعمل رغم ذلك!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
تعمل صيغةcadafi ur بشكل جيد ولكنها ليست الاستخدام الأمثل أو الفعال لها. بدلاً من ذلك ، يجب علينا استخدام المرجع المباشر للنطاق أو خلية بدلاً من أمر الإزاحة الكامل هذا. مثل ما يلي: = GET.CELL (20، 'Sheet1'! A1) انسخ الصيغة ثم استخدم التصفية التلقائية لتصفية القيمة TRUE. انتهى
تم تصغير هذا التعليق بواسطة المشرف على الموقع
Mohammad Faizan أنت محق تماما. شكرًا.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا محمد فايزان. أنت محق تمامًا.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لقد نجح هذا على أكمل وجه ، شكرا لك !!! : د: لول:
تم تصغير هذا التعليق بواسطة المشرف على الموقع
بسيطة ورائعة ، شكرا لك!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، أنا أستخدم هذا الرمز ويعمل بشكل جيد ولكن كلما نقرت على إلغاء مربع الحوار ، تظهر نافذة منبثقة وتظهر بعض الأخطاء. هل يمكنك إخباري بكيفية إزالة هذا الخطأ. : Sub FilterBold () Dim myRange As Range Set myRange = Application.InputBox (Prompt: = "Please Select a Range" ، Title: = "InputBox Method" ، Type: = 8) myRange.Select Application.ScreenUpdating = False For each myRange في التحديد إذا كان myRange.Font.Bold = False ثم myRange.EntireRow.Hidden = True End If Next myRange Application.ScreenUpdating = True End Sub
تم تصغير هذا التعليق بواسطة المشرف على الموقع
عزيزي نيتين جاين ،

آسف للرد في وقت متأخر جدا!

لقد وجدنا المشكلة وقمنا بإصلاحها بالفعل. تم الآن تحديث البرنامج النصي VBA في المقالة ،

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



لم نواجه المشكلة كما ذكرت. هل يمكنك من فضلك تقديم لقطة شاشة مع تفاصيل العملية الخاصة بك؟



شكرا لك على تعليقك!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا على الصيغة .. لقد ساعدت
تقييم شنومك من شنومكس
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL