Skip to main content

Kutools for Office — مجموعة واحدة. خمسة أدوات. أنجز المزيد.

كيفية تغيير الألوان حسب النقاط في المخططات داخل برنامج Excel؟

Author Xiaoyang Last modified

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

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

a screenshot showing the original table
a screenshot of an arrow
a screenshot of the chart with different colors for each data points

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

تغيير الألوان حسب النقاط للمخططات (الأعمدة/الشريط/الخط)

VBA: تعيين ألوان مخصصة لنقاط بيانات المخطط


تغيير الألوان حسب النقاط للمخططات (الأعمدة/الشريط/الخط)

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

لتلوين كل نقطة بيانات بألوان مختلفة، استخدم الخطوات التالية:

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

a screenshot of clicking the Format Data Series option

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

a screenshot of changing the Fill option

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

a screenshot of changing the Fill option in Excel2013

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

a screenshot showing different column colors in a chart

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

a screenshot showing how to change the Theme of the chart

5. بعد تغيير الثيم، سيعرض المخطط أعمدة أو أشرطة البيانات بالألوان الجديدة التي اخترتها.

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

استكشاف الأخطاء وإصلاحها:
• إذا كان الخيار "تغيير الألوان حسب النقاط" غير مفعل (رمادي اللون)، تحقق مما إذا كان لديك أكثر من سلسلة واحدة في المخطط. هذا الخيار متاح فقط للمخططات ذات السلسلة الواحدة.
• في بعض إصدارات Excel القديمة، قد تختلف التسميات أو الرموز قليلاً؛ مرر مؤشر الماوس فوق الخيارات المشابهة للعثور عليها.
• إذا لم يتم تحديث المخطط فورًا، حاول إعادة النقر فوق المخطط أو تحديث ورقة العمل.

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


VBA: تعيين ألوان مخصصة لنقاط بيانات المخطط

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

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

1. انقر فوق أدوات التطوير > Visual Basic. في نافذة Microsoft Visual Basic for Applications الجديدة، انقر فوق إدراج > وحدة، وأدخل الكود التالي في الوحدة:

Sub SetChartPointColors()
    ' Assigns custom colors to each data point in the first series of the first chart on the active sheet
    Dim cht As ChartObject
    Dim i As Integer
    Dim colorArray As Variant

    ' Define custom color codes (RGB values or color constants)
    colorArray = Array(RGB(255, 0, 0), RGB(0, 176, 80), RGB(0, 112, 192), RGB(255, 192, 0), RGB(112, 48, 160))
    
    On Error Resume Next
    Set cht = ActiveSheet.ChartObjects(1)
    
    If cht Is Nothing Then
        xTitleId = "KutoolsforExcel"
        MsgBox "No chart found on the active sheet.", vbExclamation, xTitleId
        Exit Sub
    End If
    
    For i = 1 To cht.Chart.SeriesCollection(1).Points.Count
        cht.Chart.SeriesCollection(1).Points(i).Format.Fill.ForeColor.RGB = colorArray((i - 1) Mod UBound(colorArray) + 1)
    Next i
    
    MsgBox "Custom colors have been assigned to data points.", vbInformation, xTitleId
End Sub

شرح المعلمات ونصائح التخصيص:
colorArray تحتوي على قيم الألوان التي تريد تعيينها لنقاط البيانات. يمكنك تعديل هذه القيم الثلاثية RGB لتتناسب مع احتياجاتك الدقيقة للألوان.
ActiveSheet.ChartObjects(1) يستهدف أول كائن مخطط في ورقة العمل النشطة. إذا كان لديك عدة مخططات، قد تحتاج إلى تعديل هذا المرجع.

2. لتشغيل الكود، انقر فوق الزر Run button في VBA أو اضغط على F5. ستقوم macro بتطبيق لوحة الألوان المخصصة الخاصة بك على كل نقطة في السلسلة الأولى من المخطط. إذا كانت هناك نقاط أكثر من الألوان الموجودة في الصفيف، ستقوم macro بالدوران عبر ألوانك.

احتياطات واستكشاف الأخطاء وإصلاحها:
• تأكد من تفعيل أذونات macros في إعدادات Excel الخاصة بك، حيث تكون macros معطلة افتراضيًا.
• إذا تلقيت رسالة "لم يتم العثور على مخطط"، قم بتفعيل ورقة العمل التي تحتوي على المخطط المستهدف.
• يمكن تعديل ألوان RGB حسب الحاجة، استخدم منتقي الألوان في Excel أو الأدوات عبر الإنترنت للعثور على رموز RGB المفضلة لديك.
• يمكنك تحسين VBA بشكل أكبر ليعطيك مطالبة لاختيار الألوان أو للعمل مع مخططات/سلسلة محددة.

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


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

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

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


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

  • تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!

جميع إضافات Kutools. مثبت واحد

حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.

Excel Word Outlook Tabs PowerPoint
  • حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
  • مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
  • الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
  • تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
  • قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد