كيف تجد التاريخ الأقرب لتاريخ اليوم ضمن قائمة في Excel؟

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

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام الصيغ

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام KUTOOLS AI

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام استخدم تنسيق الشروط

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام رمز VBA

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام الصيغ

● العثور على أقرب تاريخ سابق لتاريخ اليوم

تخيّل سيناريوًّا لديك فيه قائمةٌ من التواريخ، وكان تاريخ اليوم هو 29/1/2015. وتحتاج إلى تحديد أحدث تاريخ سبق هذا التاريخ بسرعة. يُعدّ هذا مفيدًا بشكل خاص للتحقق من آخر مهمة تم إنجازها أو لتتبُّع المواعيد النهائية التي مضى عليها وقتٌ قصير. إليك كيفية تنفيذ ذلك باستخدام صيغة مصفوفة:

1. حدد خلية فارغة، مثل الخلية B2، التي ترغب في عرض أقرب تاريخ سابق فيها.

2. أدخل الصيغة التالية في شريط الصيغة، ثم اضغط علىCtrl+Shift+Enter (لأنها صيغة مصفوفة):

=MAX(($A$2:$A$18<TODAY())*A2:A18)

بعد الضغط علىCtrl+Shift+Enter، ستعرض الخلية (B2) أقرب تاريخ سابق لتاريخ اليوم (على سبيل المثال، 1/26/2015 كما هو موضح أعلاه). وإذا كانت لديك تواريخ إضافية أو نطاق مختلف، فتأكد من تعديل$A$2:$A$18 ليتوافق مع مجموعة البيانات الفعلية الخاصة بك.

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

● العثور على أقرب تاريخ مستقبلي لتاريخ اليوم

يشرح هذا القسم كيفية تحديد التاريخ الأقرب الذي لم يحن بعد—وهو مفيد جدًّا لاكتشاف الموعد التالي أو الحدث أو الموعد النهائي:

1. انقر في خلية هدف فارغة (مثل B2)، ثم أدخل الصيغة التالية واضغطCtrl+Shift+Enter لتأكيدها كصيغة مصفوفة:

=MIN(IF(A2:A18>TODAY(),A2:A18))

ستُرجع هذه الصيغة أقرب تاريخ مستقبلي بعد تاريخ اليوم الموجود في الخلية B2.

• نصائح:
  • تأكد من أن جميع القيم في نطاق المصدر (A2:A18) تمثّل تواريخ صالحة في Excel، وإلا فقد تُرجع الصيغة أخطاءً أو نتائج غير متوقعة.
  • عند نسخ الصيغة إلى خلايا أخرى، تأكد من تحديث المراجع وفقًا لذلك لتجنب الإشارة إلى نطاقات غير صحيحة.
  • إذا لم يكن تنسيق خليتك كتاريخ، استخدمCtrl+1 لفتح مربع تنسيق الخلية وضبطه على تنسيق التاريخ، ليظهر الناتج بشكل صحيح.
  • إذا لم يحتوِ نطاقك على أي تاريخ مستقبلي، فستُرجع الصيغة القيمة 0.

ملاحظات:

• عدّل نطاق الصيغة ليتوافق مع مجموعة البيانات الخاصة بك.
• كلما حدّثت قائمة التواريخ الخاصة بك، تُعيد الصيغة الحساب تلقائيًّا عند إعادة حساب المصنف.

ابحث وسَلِّط الضوء على أقرب تاريخ سابق أو مستقبلي لتاريخ اليوم باستخدام KUTOOLS AI

بسِّط تحليل التواريخ باستخدام ميزةKUTOOLS AI Aide في Excel! يتيح لك هذا الأسلوب اكتشاف أقرب تاريخ سابق أو مستقبلي وتظليله فورًا—مثاليٌّ للمستخدمين الباحثين عن حلٍّ سريع وتفاعلي دون الحاجة إلى إنشاء صيغ أو أكواد معقدة.

بعد تثبيتKutools لـ Excel، يمكنك الوصول إلى جزءKUTOOLS AI Aide من خلالKutools > مساعد الذكاء الاصطناعي.

1. حدد نطاق تواريخ البيانات التي ترغب في تحليلها.
2. اكتب طلبك في مربع الدردشة الخاص بـ KUTOOLS AI، على سبيل المثال:
   ابحث عن أقرب تاريخ سابق لتاريخ اليوم من التواريخ المحددة وقم بتظليله بلون أحمر فاتح
   ابحث عن أقرب تاريخ مستقبلي لتاريخ اليوم من التواريخ المحددة وقم بتظليله بلون أحمر فاتح
3. اضغطEnter أو انقر على زرإرسال. وبمجرد اكتمال التحليل، انقر علىتنفيذلتطبيق النتائج ورؤية التاريخ الأقرب مُظلَّلًا في ورقة العمل الخاصة بك.
   

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

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

ابحث وسَلِّط الضوء على أقرب تاريخ سابق أو مستقبلي لتاريخ اليوم باستخدام استخدم تنسيق الشروط

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

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

لتظليل التاريخ الموجود في النطاق A2:A18 الذي يُعدّ الأقرب (سواء قبل أو بعد) لتاريخ اليوم، اتبع الخطوات التالية:

1. حدد نطاق التواريخ الخاص بك (مثل: A2:A18).
2. في علامة التبويبالرئيسية، انقر علىاستخدم تنسيق الشروط، ثم اخترقاعدة جديدة.
3. اختراستخدام صيغة لتحديد الخلايا التي سيتم تنسيقها.
4. الصق الصيغة التالية في مربع الصيغة:

   =AND(A2<>TODAY(), ABS(A2-TODAY())=MIN(IF($A$2:$A$18<>TODAY(), ABS($A$2:$A$18-TODAY())))
   )

5. انقر علىتنسيق، واختر تنسيق التظليل المطلوب (مثل تعبئة اللون)، ثم انقر علىموافقلإنهاء إعداد القاعدة.

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

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

العثور على التاريخ الأقرب السابق أو المستقبلي لتاريخ اليوم وتمييزه باستخدام رمز VBA

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

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

فيما يلي ماكرو VBA نموذجي للعثور على التاريخ الأقرب لتاريخ اليوم (سواء في الماضي أو المستقبل) ضمن القائمة المحددة لديك، مع إمكانية تظليله:

1. انتقل إلى علامة التبويبالمطور، ثم انقر علىVisual Basic لفتح محرر VBA. في نافذة VBA، حددإدراج > وحدة نمطية، والصق الكود أدناه في الوحدة النمطية:

Sub HighlightClosestDateExcludingToday()
'Updated by Extendoffice 20250722
    Dim WorkRng As Range
    Dim ClosestCell As Range
    Dim MinDiff As Double
    Dim CurrentDiff As Double
    Dim TodayDate As Date
    Dim cell As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select the range containing the dates:", xTitleId, WorkRng.Address, Type:=8)
    
    If WorkRng Is Nothing Then Exit Sub
    
    TodayDate = Date
    MinDiff = 1E+100
    
    For Each cell In WorkRng
        If IsDate(cell.Value) And Not IsEmpty(cell.Value) Then
            If cell.Value <> TodayDate Then ' ????
                CurrentDiff = Abs(cell.Value - TodayDate)
                If CurrentDiff < MinDiff Then
                    MinDiff = CurrentDiff
                    Set ClosestCell = cell
                End If
            End If
        End If
    Next cell
    
    If Not ClosestCell Is Nothing Then
        ClosestCell.Interior.Color = vbYellow ' ??????
        MsgBox "The date closest to today (excluding today) is: " & ClosestCell.Value, vbInformation, "Closest Date"
    Else
        MsgBox "No valid dates (other than today) found in the selected range.", vbExclamation, "No Date"
    End If
End Sub

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

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

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

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

• كيف يمكنك العثور على أول جمعة أو آخر جمعة من كل شهر في Excel؟
• كيف يمكنك العثور على أقل 5 قيم وأعلى 5 قيم في قائمة داخل Excel؟
• كيف يمكنك التحقق مما إذا كان مصنف معين مفتوحًا في Excel أم لا؟
• كيف يمكنك معرفة ما إذا كانت خلية ما مُشار إليها من خلية أخرى في Excel؟
• كيف تجد موقع أول رقم أو آخر رقم في سلسلة نصية في Excel؟

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

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

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

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

مزيد من التفاصيل حول Kutools لـ Excel...تنزيل مجاني...

---

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

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

مزيد من التفاصيل حول Office Tab...تنزيل مجاني...

---

جميع الإضافات من Kutools في برنامج تثبيت واحد!

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

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

مزيد من التفاصيل حول Kutools for Office...تنزيل مجاني...