Skip to main content

كيفية تلوين المخطط بناءً على لون الخلية في Excel؟

Author: Xiaoyang Last Modified: 2025-08-06

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

color chart based on cell color

تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام رموز VBA

تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام ميزة رائعة


تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام رموز VBA

تلوين المخطط بسلسلة بيانات واحدة بناءً على لون الخلية

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

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

insert a Column or Bar Chart

2. اضغط على ALT + F11 لفتح محرر Microsoft Visual Basic for Applications (VBA).

3. في نافذة VBA، انقر فوق إدراج > وحدة. ثم، انسخ والصق الكود التالي في نافذة الوحدة. هذا البرنامج النصي سيحدث كل شريط مخطط ليتطابق مع لون تعبئة الخلية المقابلة له.

كود VBA: تلوين أشرطة المخطط بسلسلة بيانات واحدة بناءً على لون الخلية:

Sub ColorChartColumnsbyCellColor()
'Updateby Extendoffice
    Dim xChart As Chart
    Dim I As Long, xRows As Long
    Dim xRg As Range, xCell As Range
    On Error Resume Next
    Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
    If xChart Is Nothing Then Exit Sub
    With xChart.SeriesCollection(1)
        Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(1), "!")(1))
        xRows = xRg.Rows.Count
        Set xRg = xRg(1)
        For I = 1 To xRows
            .Points(I).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xRg.Offset(I - 1, 0).Interior.ColorIndex)
        Next
    End With
End Sub
ملاحظة: في الكود أعلاه، استبدل Chart1 باسم المخطط الفعلي الخاص بك (يمكنك العثور عليه في مربع الاسم عندما يتم تحديد المخطط). إذا قمت بتغيير اسم المخطط لاحقًا، حدّث الماكرو وفقًا لذلك.)

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

run vba code to color the chart by cell color

هذه الطريقة مفيدة للمخططات حيث يتم تعيين ألوان تعبئة الخلايا يدويًا ويتم توقع التعديلات اليدوية المتكررة. ضع في اعتبارك، مع ذلك، أنه إذا تغيرت ألوان الخلايا، تحتاج إلى إعادة تشغيل VBA لتحديث المخطط، لأن الربط ليس ديناميكيًا. أيضًا، تذكر حفظ مصنفك كملف ممكّن الماكرو (.xlsm) حتى يستمر الكود.


تلوين المخطط بسلاسل بيانات متعددة بناءً على لون الخلية

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

1. قم بإعداد بياناتك وأنشئ مخطط شريطي أو عمودي متعدد السلاسل كما هو موضح أدناه:

Color the chart with multiple data series based on cell color

2. اضغط على ALT + F11 لفتح محرر VBA.

3. في نافذة VBA، انقر فوق إدراج > وحدة والصق الكود التالي:

كود VBA: تلوين أشرطة المخطط بسلاسل بيانات متعددة بناءً على لون الخلية:

Sub CellColorsToChart()
'Updateby Extendoffice
    Dim xChart As Chart
    Dim I As Long, J As Long
    Dim xRowsOrCols As Long, xSCount As Long
    Dim xRg As Range, xCell As Range
    On Error Resume Next
    Set xChart = ActiveSheet.ChartObjects("Chart 1").Chart
    If xChart Is Nothing Then Exit Sub
    xSCount = xChart.SeriesCollection.Count
    For I = 1 To xSCount
        J = 1
        With xChart.SeriesCollection(I)
            Set xRg = ActiveSheet.Range(Split(Split(.Formula, ",")(2), "!")(1))
            If xSCount > 4 Then
                xRowsOrCols = xRg.Columns.Count
            Else
                xRowsOrCols = xRg.Rows.Count
            End If
            For Each xCell In xRg
                .Points(J).Format.Fill.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
                .Points(J).Format.Line.ForeColor.RGB = ThisWorkbook.Colors(xCell.Interior.ColorIndex)
                J = J + 1
            Next
        End With
    Next
End Sub

4. قم بتشغيل هذا الكود بالضغط على F5. ستتم تحديث سلسلة المخطط الخاصة بك لتعكس ألوان تعبئة الخلايا في نطاق البيانات الخاص بك، كما هو موضح أدناه:

run vba code to color the chart with multiple data series based on cell color

ملاحظات:
  • يُشير الكود إلى المخطط باسم Chart1 افتراضيًا. يرجى تعديله ليتطابق مع اسم المخطط الفعلي الخاص بك حسب الحاجة.
  • هذا النهج يدعم أيضًا المخططات الخطية، وليس فقط أنواع المخططات الشريطية أو العمودية.
  • إذا واجهت أي مشكلات (مثل عدم التحديث أو الأخطاء)، تحقق من أن سلاسل بيانات المخطط ونطاق ألوان الخلايا متطابقان واحدًا لواحد.

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


تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام ميزة رائعة

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

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

بعد تثبيت Kutools لـ Excel، اتبع الخطوات التالية:

1. أدخل المخطط الذي ترغب في تلوينه. حدد المخطط، ثم انتقل إلى Kutools > المخططات > أدوات المخطط > تغيير لون المخطط حسب لون الخلية، كما هو موضح في الصورة أدناه:

click Change Chart Color According to Cell Color feature of kutools

2. عند المطالبة، انقر ببساطة على موافق في مربع الحوار الذي يظهر.

a prompt box is popped out

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

تلوين المخطط بسلسلة بيانات واحدة بناءً على لون الخلية
Color the chart with one data series based on cell color

تلوين المخطط بسلاسل بيانات متعددة بناءً على لون الخلية
Color the chart with multiple data series based on cell color

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

قم بتنزيل Kutools لـ Excel الآن وجرّبه مجانًا!


مقالات مخطط أكثر ارتباطًا:

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

أفضل أدوات زيادة الإنتاجية لمجموعة Office

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات بفضل: التنفيذ الذكي|توليد الشيفرة|إنشاء الصيغ المخصصة|تحليل البيانات وتوليد الرسوم البيانية|استدعاء الوظائف المحسنة
الميزات الشائعة: إيجاد أو تمييز أو وضع علامة على المكررات|حذف الصفوف الفارغة|دمج الأعمدة أو الخلايا دون فقدان البيانات|تقريب...
بحث متقدم: بحث V بمعايير متعددة|بحث V بقيم متعددة|بحث في عدة ورقات|مطابقة غامضة ....
قائمة منسدلة متقدمة: أنشئ قائمة منسدلة بسرعة|قائمة منسدلة معتمدة|قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد معين من الأعمدة |نقل الأعمدة |تغيير حالة إظهار/إخفاء الأعمدة المخفية| مقارنة النطاقات و الأعمدة ...
ميزات مميزة: التركيز على الشبكة|عرض التصميم|شريط الصيغ المحسن|إدارة أدوات المصنف وورقة العمل|مكتبة النص التلقائي (Auto Text)|منتقي التاريخ|دمج البيانات |تشفير/فك تشفير الخلايا|إرسال البريد الإلكتروني حسب القائمة|مرشح متقدم|تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض أو مائل أو يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ... )|أكثر من50 نوعاً من الرسوم البيانية (مخطط جانت، ...)|أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...)|19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ... )|12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...)|7 أدوات دمج و تقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...)|... والمزيد
استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من40 لغة أخرى!

عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


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

  • فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
  • افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
  • يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!