كيفية عرض جميع التواريخ بين تاريخين في Excel؟
في بعض الحالات، إذا كان لديك تاريخ بداية وتاريخ نهاية محددين، قد تحتاج إلى عرض جميع التواريخ بين هذين التاريخين في Excel. يوضح هذا الدليل الطرق المختلفة لعرض جميع التواريخ بين تاريخين في Excel.
عرض جميع التواريخ بين تاريخين باستخدام الصيغ
عرض جميع التواريخ بين تاريخين باستخدام Kutools لـ Excel
عرض جميع التواريخ بين تاريخين باستخدام VBA
عرض جميع التواريخ بين تاريخين باستخدام الصيغ
هنا أقدم لك بعض الصيغ التي تتيح لك بسرعة عرض جميع التواريخ بين تاريخين محددين في Excel.
1. اكتب تاريخ البداية وتاريخ النهاية في خليتين، هنا سأكتبها في الخلية A1 وA2. انظر الصورة:
2. ثم انتقل إلى الخلية C1 واكتب هذه الصيغة =A1+1 فيها، ثم اضغط على Enter مفتاح الإدخال. انظر الصورة:
3. ثم في الخلية C2، اكتب هذه الصيغة =IF($A$1+ROW(A1)>=$A$2-1,"",C1+1) ثم اسحب مقبض التعبئة التلقائية للأسفل حتى تظهر خلية فارغة. انظر الصور:
بعد ذلك ستلاحظ أن جميع التواريخ بين التاريخين المحددين قد تم عرضها في العمود.
ملاحظة:
في الصيغ أعلاه، تشير A1 إلى تاريخ البداية، وA2 إلى تاريخ النهاية، وC1 هي أول تاريخ ضمن النطاق الزمني.
عرض جميع التواريخ بين تاريخين باستخدام Kutools لـ Excel
في الواقع، إذا قمت بتثبيت Kutools لـ Excel – وهي أداة إضافية عملية، يمكنك أيضًا استخدام إدراج بيانات عشوائية لحل هذه المشكلة.
بعد تثبيت Kutools لـ Excel مجانًا، يرجى اتباع الخطوات التالية:
1. حدد العمود الذي ترغب في عرض التواريخ فيه بين تاريخين، ثم انقر على Kutools > إدراج > إدراج بيانات عشوائية. انظر الصورة:
2. ثم في إدراج بيانات عشوائية نافذة الحوار، انقر على علامة تبويب التاريخ ، ثم اختر تاريخ البداية وتاريخ النهاية من من و إلىالقائمة، وتأكد من تحديد أيام العمل, عطلة نهاية الأسبوع و توليد قيم فريدة خانات التحديد. انظر الصورة:
3. انقر على Ok لإغلاق نافذة الحوار، وستظهر نافذة Kutools لـ Excel أخرى، فقط انقر على Yes. بعد ذلك ستلاحظ أن التواريخ بين تاريخ البداية وتاريخ النهاية قد تم عرضها. انظر الصور:
4. الآن تحتاج إلى ترتيب قائمة التواريخ حسب الترتيب الذي تريده. انقر على البيانات > ترتيب من الأقدم إلى الأحدث. بعد ذلك ستلاحظ أن التواريخ مرتبة من الأقدم إلى الأحدث. انظر الصور:
باستخدام أداة إدراج بيانات عشوائية، يمكنك أيضًا إدراج عدد صحيح عشوائي، أو سلسلة عشوائية، أو وقت عشوائي وغير ذلك. انقر هنا لمعرفة المزيد حول إدراج بيانات عشوائية.
عرض جميع التواريخ بين تاريخين باستخدام VBA
إذا كنت مهتمًا باستخدام أكواد الماكرو، يمكنك استخدام كود VBA أدناه لعرض جميع التواريخ بين تاريخين محددين في Excel.
1. اكتب تاريخ البداية وتاريخ النهاية في خليتين، هنا سأكتب في الخلية A1 وB1. انظر الصورة:
2. اضغط على مفاتيح Alt +F11 لفتح نافذة Microsoft Visual Basic for Applications.
3. ثم انقر على إدراج > وحدة نمطية، وانسخ والصق كود VBA أدناه في نافذة الوحدة المنبثقة.
VBA: عرض جميع التواريخ بين تاريخين.
Sub WriteDates()
'Updateby20150305
Dim rng As Range
Dim StartRng As Range
Dim EndRng As Range
Dim OutRng As Range
Dim StartValue As Variant
Dim EndValue As Variant
xTitleId = "KutoolsforExcel"
Set StartRng = Application.Selection
Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)
Set EndRng = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set OutRng = OutRng.Range("A1")
StartValue = StartRng.Range("A1").Value
EndValue = EndRng.Range("A1").Value
If EndValue - StartValue <= 0 Then
Exit Sub
End If
ColIndex = 0
For i = StartValue To EndValue
OutRng.Offset(ColIndex, 0) = i
ColIndex = ColIndex + 1
Next
End Sub
4. انقر على تشغيل أو F5 لتشغيل كود VBA، وستظهر نافذة حوار لتحديد تاريخ البداية، ثم انقر على OK، ثم حدد تاريخ النهاية في نافذة الحوار الثانية. انظر الصورة:
5. انقر على OK، ثم حدد خلية لوضع التواريخ، ثم انقر على OK مرة أخرى. الآن ستلاحظ أن جميع التواريخ بين التاريخين قد تم عرضها. انظر الصور:
ملاحظة: القائمة التي يتم توليدها بواسطة هذا الكود تشمل تاريخ البداية وتاريخ النهاية.
عرض جميع التواريخ بين تاريخين
مقالات ذات صلة:
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!