كيف يمكن تلوين المخطط وفقًا لألوان خلايا Excel؟
عند إنشاء مخطط قياسي في Excel، مثل مخطط عمودي أو شريطي، يُعيّن Excel تلقائيًا ألوانه الافتراضية لسلسلة البيانات أو نقاطها—وهي ألوان قد لا تتماشى مع تعبئة الخلايا في نطاق البيانات الأصلي. ومع ذلك، في العديد من السيناريوهات—مثل لوحات المعلومات، والتقارير، وتصورات البيانات—قد ترغب في أن تتطابق ألوان أشرطة المخطط تمامًا مع الألوان التي طبّقتها يدويًّا على خلايا المصدر. ويُسهم هذا التطابق في الحفاظ على الاتساق البصري، ويسهّل فهم البيانات بلمحة سريعة، كما يعزز تمييز الفئات التي تعتمد اللون كمؤشر دلالي. على سبيل المثال، قد تريد أن يعكس كل عمود في مخططك الترميز اللوني المستخدم في جدول الملخص الخاص بك، كما هو موضح في لقطة الشاشة أدناه. مع ذلك، لا يوفّر Excel ميزة مضمنة لربط ألوان تعبئة الخلايا (خاصة تلك المعينة يدويًّا) تلقائيًا بعناصر المخطط. ولذلك، يتعيّن اعتماد أساليب مختلفة بناءً على ما إذا كان لون الخلية معينًا يدويًّا أو ناتجًا عن صيغة أو قاعدة تنسيق شرطي. فيما يلي، نعرض عدة حلول عملية تساعدك على تحقيق هذا التطابق بفعالية عبر مختلف السيناريوهات.
تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام أكواد VBA
تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام ميزة مذهلة
تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام أكواد VBA
تلوين المخطط بسلسلة بيانات واحدة بناءً على لون الخلية
إذا كنت ترغب في جعل أشرطة المخطط ترث ألوان التعبئة من الخلايا المقابلة لها—بافتراض أن ألوانك مُعيَّنة يدويًّا (وليس عبر تنسيق شرطي أو صيغ)—فيمكنك استخدام VBA لمزامنة ألوان أشرطة المخطط مع ألوان الخلايا الأصلية. وتُعد هذه التقنية مفيدة جدًّا للمخططات ذات السلسلة الواحدة، حيث يكون التطابق البصري عنصرًا جوهريًّا لضمان الوضوح أو الامتثال لمعايير إعداد التقارير.
1. أولًا، حدد بياناتك وأنشئ مخطط شريطي. للقيام بذلك، حدد الخلايا ذات الصلة، ثم انقر علىإدراج > إدراج عمود أو رسم بياني شريطي. سترى مخططًا افتراضيًا مشابهًا لما في لقطة الشاشة أدناه:
2. اضغط علىALT + F11 لفتح محررمايكروسوفت فيجوال بيسك للتطبيقات (VBA).
3. في نافذة VBA، انقر علىإدراج > وحدة نمطية (Module). بعد ذلك، انسخ والصق الكود التالي في نافذة الوحدة النمطية. سيقوم هذا البرنامج النصي بتحديث كل شريط في المخطط ليتطابق مع لون تعبئة الخلية المقابلة له.
كود 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
4. بعد إدخال الكود، اضغط علىF5 لتشغيل الماكرو. ستعكس أشرطة المخطط الآن تعبئة لون خلايا المصدر، مما يوفّر تطابقًا بصريًا فوريًا، كما هو موضح في لقطة الشاشة التالية:
هذه الطريقة مثالية للمخططات التي يتم فيها تحديد تعبئة ألوان الخلايا يدويًا، خاصةً إذا كنت تتوقع إجراء تعديلات يدوية متكررة. ضع في اعتبارك أنه في حال تغيّر ألوان الخلايا، ستحتاج إلى إعادة تشغيل كود VBA لتحديث المخطط، نظرًا لأن الربط ليس ديناميكيًا. ولا تنسَ حفظ ملفك بتنسيق يدعم الماكرو (.xlsm) لضمان بقاء الكود محفوظًا.
تلوين المخطط بعدة سلاسل بيانات بناءً على لون الخلية
إذا كان مخططك يحتوي على سلاسل بيانات متعددة (مثل منتجات مختلفة عبر الزمن أو فئات متنوعة)، فيمكنك استخدام نهج VBA مشابه لربط كل شريحة أو نقطة بيانات بلون تعبئة خليتها المصدر. ويُسهم ذلك في الحفاظ على التناسق البصري لتقاريرك، ويجعل من الأسهل على المشاهدين الربط بين ورقة العمل والمخطط بسلاسة.
1. أعد تنظيم بياناتك وأنشئ شريطًا متعدد السلاسل أو مخطط شريطي كما هو موضح أدناه:
2. اضغط علىALT + F11 لفتح محرر VBA.
3. في نافذة VBA، انقر علىإدراج > وحدة نمطية (Module)، ثم الصق الكود التالي:
كود 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. سيتم تحديث سلاسل المخطط تلقائيًا لتعكس ألوان تعبئة الخلايا في نطاق البيانات الخاص بك، كما هو موضح أدناه:
- يشير الكود إلى المخطط باسمChart1 افتراضيًا. يُرجى تعديله ليتوافق مع الاسم الفعلي لمخطّطك حسب الحاجة.
- يدعم هذا الأسلوب أيضًا مخططات الخطوط، وليس فقط مخططات الأعمدة أو الأشرطة.
- إذا واجهت أي مشكلات (مثل عدم التحديث أو ظهور أخطاء)، فتأكد من أن سلسلة بيانات المخطط ونطاق ألوان الخلايا متوافقتان توافقًا واحدًا لواحد.
رغم أن هذه التقنية تمنحك تحكمًا كاملاً ومرونةً مع البيانات الملوَّنة يدويًا، إلا أنها لا تعالج الحالات التي يُنشأ فيها اللون باستخدام التنسيق الشرطي أو تلقائيًا عبر الصيغ. في تلك الحالات، راجع الحلول القائمة على الصيغ واستخدم التنسيق الشرطي أدناه للحصول على خيارات أكثر ديناميكية.
تلوين المخطط بسلسلة بيانات واحدة أو متعددة بناءً على لون الخلية باستخدام ميزة مذهلة
بينما يمكن لـ VBA مزامنة لون الرسم البياني مع تعبئة الخلايا، فإنه يتطلب تشغيل الكود يدويًّا، وقد لا يشعر بعض المستخدمين بالراحة عند التعامل مع الماكرو أو تنبيهات أمان VBA. إذا كنت تبحث عن حل أكثر سلاسة وتفاعلية، فإن ميزةتغيير لون الرسم البياني بناءً على لون الخليةفيKutools لـ Excelتوفّر حلاً فعّالًا. تقوم هذه الأداة تلقائيًّا بتطبيق ألوان تعبئة الخلايا على عناصر المخطط المقابلة—سواء كانت لديك سلسلة بيانات واحدة أو متعددة—وتعمل حتى بعد تحديث ألوان الخلايا لاحقًا (فإعادة التطبيق البسيطة ستُجدّد الربط فورًا).
بعد تثبيتKutools لـ Excel، اتبع الخطوات التالية:
1. أدرج المخطط الذي ترغب في تلوينه. حدد المخطط، ثم انتقل إلىKutools > المخططات > أدوات الرسم البياني > تغيير لون الرسم البياني بناءً على لون الخلية، كما هو موضح في الصورة أدناه:
2. عند المطالبة، انقر ببساطة علىموافقفي مربع الحوار الظاهر.
3. سيتم تحديث المخطط تلقائيًا ليتماشى مع ألوان خلاياك، كما في الأمثلة التالية:
تلوين المخطط بسلسلة بيانات واحدة بناءً على لون الخلية
تلوين المخطط بعدة سلاسل بيانات بناءً على لون الخلية
هذه الميزة مثالية لأي شخص يحتاج بانتظام إلى مطابقة ألوان الرسوم البيانية تلقائيًا ويرغب في حلٍّ قابل لإعادة الاستخدام، بغض النظر عن تحديثات البيانات. فهي توفر وقتًا كبيرًا مقارنةً بالتنسيق اليدوي أو تشغيل ماكرو، وتُعدّ مفيدةً بشكل خاص في البيئات التعاونية التي يُعدّل فيها عدة أشخاص البيانات أو عروض المخططات.
حمّل Kutools لـ Excel وجربه مجانًا الآن!
مقالات متعلقة بالمخططات أكثر:
- إنشاء رسم بياني شريطي يتداخل مع رسم بياني شريطي آخر في Excel
- عند إنشاء مخطط شريطي مجمّع يحتوي على سلسلتي بيانات، تظهر أشرطة السلسلتين جنبًا إلى جنب. لكن في بعض الأحيان، قد تحتاج إلى استخدام مخطط شريطي متداخل أو متراكب لمقارنة سلسلتي البيانات بشكل أوضح. في هذه المقالة، سأشرح لك كيفية إنشاء مخطط شريطي متداخل في Excel.
- نسخ تنسيق مخطط واحد إلى مخططات أخرى في Excel
- لنفترض أن لديك عدة أنواع مختلفة من المخططات في ورقة العمل، وقد قمت بتنسيق أحد المخططات بالشكل الذي تريده. الآن، تريد تطبيق نفس التنسيق على المخططات الأخرى. بالطبع، يمكنك تنسيق كل مخطط يدويًا واحدًا تلو الآخر، لكن ذلك سيستغرق وقتًا طويلاً. هل توجد طريقة سريعة أو عملية لنسخ تنسيق مخطط واحد إلى مخططات أخرى في Excel؟
- تمييز نقاط البيانات ذات القيم القصوى والدنيا في المخطط
- إذا كان لديك مخطط شريطي وتريد تمييز أعلى وأقل نقاط البيانات بألوان مختلفة لجعلها بارزة، كما في لقطة الشاشة التالية، فكيف يمكنك تحديد القيم العظمى والصغرى ثم تمييز نقاط البيانات في المخطط بسرعة؟
- إنشاء مخطط الخطوة في Excel
- يُستخدم مخطط الخطوة لعرض التغييرات التي تحدث على فترات غير منتظمة، وهو نسخة موسَّعة من مخطط الخط. لكن لا توجد طريقة مباشرة لإنشائه في Excel. في هذه المقالة، سأوضح لك خطوة بخطوة كيفية إنشاء مخطط الخطوة في ورقة عمل Excel.
- إنشاء رسم بياني لشريط التقدم في Excel
- في Excel، يمكن أن يساعدك مخطط شريط التقدم في تتبع تقدُّمك نحو هدفٍ معيَّن، كما يظهر في لقطة الشاشة التالية. ولكن كيف يمكنك إنشاء مخطط شريط التقدم هذا في ورقة عمل Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل