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

➤ تمييز الأرقام الفردية أو الزوجية باستخدام استخدم تنسيق الشروط
➤ تمييز الأرقام الفردية أو الزوجية باستخدام KUTOOLS AI Aide
➤ تمييز الأرقام الفردية أو الزوجية باستخدام كود VBA
تلوين الأرقام الفردية أو الزوجية باستخدام استخدم تنسيق الشروط
يتيح لك التنسيق الشرطي تطبيق التنسيقات تلقائيًّا—مثل تعبئة الخلفية بلون معين—بناءً على قواعد محددة، وهو الحل المثالي لتلوين الأرقام الفردية أو الزوجية دون الحاجة إلى البحث أو الفرز يدويًّا. اتبع الخطوات التالية:
1. حدد النطاق الذي يحتوي على القيم التي تريد تقييمها (سواءً كان عمودًا واحدًا، أعمدة متعددة، أو الورقة بأكملها—مع التأكد من تضمين الخلايا التي ترغب في تنسيقها فقط).
2. في علامة التبويبالصفحة الرئيسية، انقر علىاستخدم تنسيق الشروط > قاعدة جديدة.

3. في مربع الحوارقاعدة تنسيق جديدة، اختراستخدم صيغة لتحديد الخلايا المراد تنسيقها. في الحقلتنسيق القيم حيث تكون هذه الصيغة صحيحة، أدخل إحدى الصيغ التالية (للأرقام الفردية):
=MOD(A1,2)=1 =ISODD(A1) نصائح:
- A1 يجب أن تكون الخلية العلوية في نطاق التحديد الخاص بك. غيّرها إذا كان تحديدك يبدأ من خلية أخرى (مثل: B2).
- استخدممرجعًا نسبيًّا (مثل: A1، وليس$A$1) لضمان تطبيق القاعدة بشكل صحيح على النطاق بأكمله.

4. انقر علىتنسيق > تعبئة، واختر لون التعبئة، ثم انقر علىموافق.

5. انقر علىموافقمرة أخرى لتطبيق التغيير. سيتم تلوين الأرقام الفردية فورًا. ولتلوين الأرقام الزوجية، كرّر الخطوة 3 باستخدام صيغة خاصة بالأرقام الزوجية.

ملاحظات:
- لتلوين الأرقامالزوجية، استخدم:
=MOD(A1,2)=0=ISEVEN(A1) - استخدم التنسيق الشرطي الديناميكي—فبمجرد أن تتغيّر القيمة من فردية إلى زوجية (أو العكس)، يتجدّد التلوين تلقائيًّا!
- تتجاهل الدالتان
ISODD/ISEVENالخلايا غير الرقمية (مثل النصوص والأخطاء). وإذا كانت الأرقام محفوظة كنص، فقم بتحويلها إلى أرقام أولًا. - لتطبيق ألوان مختلفة على الأرقام الفردية والزوجية، أنشئ قاعدتين منفصلتين — إحداهما لكل نوع.
- إذا لم يظهر أي تلوين، فراجع نطاق التحديد وتأكد من أن مرجع الصيغة الأصلي يتطابق مع الخلية العلوية اليسرى، وأن الأرقام لا تحتوي على مسافات بادئة أو زائدة في نهايتها.
تلوين الأرقام الفردية أو الزوجية باستخدام مساعد KUTOOLS AI
Kutools لـ Excel هو برنامج إضافي مصمم لتحسين وتبسيط وظائف Excel، خاصةً للمستخدمين الباحثين عن حلول آلية وسريعة للعمليات المتكررة أو المعقدة. تتيح لك ميزة مساعد KUTOOLS AI تلوين الأرقام الفردية أو الزوجية في أي نطاق عبر تعليمات بلغة طبيعية، مما يوفر عليك عناء إعداد الصيغ أو القواعد يدويًّا.
بعد تثبيت Kutools لـ Excel، افتح Excel وانقر علىKutools > مساعد الذكاء الاصطناعيلعرض لوحة «مساعد KUTOOLS AI» على الجانب الأيمن من ورقة العمل.
- اختر نطاق البيانات الذي ترغب في تلوين الأرقام الفردية أو الزوجية ضمنه.
- اكتب طلبك في مربع الدردشة باستخدام لغتك اليومية. على سبيل المثال:
لوّن الأرقام الفردية:
لوّن الأرقام الفردية في التحديد بلون أزرق فاتح.
لوّن الأرقام الزوجية:
لوّن الأرقام الزوجية في التحديد بلون أزرق فاتح. - بعد ذلك، اضغط إما علىEnter أو انقر على زرإرسال. سيقوم KUTOOLS AI بمعالجة تعليماتك، وعندما يصبح جاهزًا، ما عليك سوى النقر على زرتنفيذلتطبيق التلوين.
هذه الطريقة المدعومة بالذكاء الاصطناعي مباشرة وسهلة الاستخدام—حتى للمبتدئين—لأنها لا تتطلب منك إعداد أي صيغ أو قواعد يدويًّا. فبمجرد أن تستخدم تنسيق الشروط بنفسك، يتولى الذكاء الاصطناعي تفسير نيتك ويُنفّذ الخطوات التقنية في الخلفية، بما في ذلك اختيار لون مناسب والتأكُّد من تنسيق الأرقام ذات الصلة فقط.
المزايا:السرعة والمرونة، والقدرة على استخدام وصف طبيعي! يشترط تثبيت Kutools لـ Excel وتفعيله. وإذا لم يتمكّن الذكاء الاصطناعي من التعرّف بدقة على طلبك، فجرّب إعادة صياغته أو قدّم تعليمات أكثر تحديدًا للحصول على نتائج أفضل.
كلٌّ من تنسيق الشروط ومساعد KUTOOLS AI يوفّران طرقًا فعّالة للتمييز البصري بين الأرقام الفردية والزوجية. يُعدّ تنسيق الشروط مثاليًّا لأولئك الذين يفضّلون الاعتماد على إمكانيات Excel المدمجة والتحكم اليدوي المباشر، بينما يوفّر مساعد KUTOOLS AI تجربةً أسرع وخاليةً من التدخل اليدوي. اختر الحل الأنسب لروتينك وتفضيلاتك! ولمزيد من استراتيجيات Excel المفيدة،يقدّم موقعنا آلاف الدروس التعليميةالتي تغطي سيناريوهاتٍ متنوعة.
تلوين الأرقام الفردية أو الزوجية باستخدام كود VBA
للمستخدمين المتمرسين في الأتمتة أو الذين يتعاملون مع مجموعات بيانات كبيرة أو متغيرة باستمرار، تُعد ماكرو VBA وسيلةً مرنة للغاية. فباستخدام VBA، يمكنك كتابة نص برمجي لتلوين جميع الأرقام الفردية أو الزوجية تلقائيًّا ضمن نطاق محدد. وتبرز فائدة هذه الطريقة خصوصًا عند الحاجة إلى إعادة تطبيق التنسيق مرارًا وتكرارًا، أو عند رغبتك في دمج هذا المنطق ضمن حلول Excel مخصصة.
على عكس تنسيق الشروط الذي يعتمد على ميزات Excel المُعدة مسبقًا، تتيح كتابة نصوص VBA تخصيصًا أعمق، مثل التبديل بين مخططات ألوان مختلفة أو إضافة رسائل توضيحية. ومع ذلك، يتطلب ذلك الوصول إلى محرر Visual Basic في Excel وفهمه.
كيفية استخدام VBA لتلوين الأرقام الفردية أو الزوجية:
1. انقر على علامة التبويبالمطوّر > Visual Basic. في النافذة التي تظهر، اخترإدراج > وحدة نمطية، ثم الصق إحدى الشيفرات التالية في نافذة الوحدة النمطية الفارغة. إذا لم ترَ علامة التبويب «المطوّر»، ففعّلها عبرملف > خيارات > تخصيص الشريط.
لتلوين الأرقام الفردية:
Sub HighlightOddNumbers()
Dim WorkRng As Range
Dim Rng As Range
Dim xTitleId As String
Dim HighlightColor As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Select the range to highlight odd numbers:", xTitleId, WorkRng.Address, Type:=8)
If WorkRng Is Nothing Then Exit Sub
HighlightColor = vbCyan
For Each Rng In WorkRng
If IsNumeric(Rng.Value) And Rng.Value Mod 2 = 1 Then
Rng.Interior.Color = HighlightColor
End If
Next
End Sub لتلوين الأرقام الزوجية:
Sub HighlightEvenNumbers()
Dim WorkRng As Range
Dim Rng As Range
Dim xTitleId As String
Dim HighlightColor As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Select the range to highlight even numbers:", xTitleId, WorkRng.Address, Type:=8)
If WorkRng Is Nothing Then Exit Sub
HighlightColor = vbYellow
For Each Rng In WorkRng
If IsNumeric(Rng.Value) And Rng.Value Mod 2 = 0 Then
Rng.Interior.Color = HighlightColor
End If
Next
End Sub 2. لتشغيل الماكرو، انقر في أي مكان داخل الشيفرة، ثم اضغط علىF5 أو انقر على زرتشغيل (السهم الأخضر في شريط الأدوات العلوي). ستظهر نافذة مطالبة لاختيار النطاق المراد معالجته. وبعد تأكيد اختيارك، سيقوم الماكرو تلقائيًّا بتلوين جميع الأرقام الفردية (أو الزوجية) باللون المحدد في النطاق المختار.
يمكنك ضبط المتغيرHighlightColor إلى أي لون تفضله (مثل: vbGreen،RGB(135,206,250)). إذا كنت بحاجة إلى إزالة التمييز، فحدّد النطاق واستخدم دالةمسح التنسيقاتفي Excel، أو عدّل كود VBA لإعادة تعيين لون الخلية.
نصائح واعتبارات:
- تعمل هذه الطريقة على القيم الثابتة: يظل التنسيق كما هو ما لم تُشغّل الماكرو مرة أخرى بعد تحديث أرقامك.
- يتطلب هذا الماكرو حفظ المصنف كملف يدعم الماكرو ()
*.xlsm). - إذا ظهر لك تحذير أمني، فتأكد من تفعيل الماكرو في إعدادات مركز التوثيق في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل