كيف تحصل على تاريخ نهاية الشهر في إكسيل؟
ربما يكون الحصول على تاريخ انتهاء الشهر أمرًا سهلاً بالنسبة لك ، ولكن إذا كانت هناك بيانات تاريخ متعددة في Excel ، فكيف يمكنك الحصول بسرعة على تاريخ انتهاء كل شهر مرة واحدة؟ الآن أقدم لك بعض الحيل السريعة لحل هذه المشكلة في Excel.
احصل على تاريخ نهاية الشهر بالصيغ في Excel
احصل على تاريخ نهاية الشهر باستخدام VBA في Excel
احصل على تاريخ نهاية الشهر بالصيغ في Excel
قد يكون من السهل جدًا استخدام صيغة للعثور على تاريخ انتهاء كل شهر لكل مستخدم Excel.
حدد خلية بجوار بيانات التاريخ ، ثم اكتب هذه الصيغة = DATE (YEAR (A2)، MONTH (A2) +1,0،XNUMX) (A2 هي الخلية التي تريد الحصول على تاريخ نهاية الشهر منها) بداخلها ، ثم اضغط أدخل على لوحة المفاتيح ، ثم اسحب التعبئة التلقائية إلى النطاق الذي تحتاجه لتطبيق هذه الصيغة. الآن يتم عرض تاريخ انتهاء كل شهر في الخلايا. انظر لقطات الشاشة:
أيضا ، يمكنك استخدام هذه الصيغة = EOMONTH (A2,0،XNUMX) للحصول على تاريخ انتهاء الشهر. (تحتاج إلى تنسيق الخلايا الناتجة كتنسيق التاريخ قبل إدخال هذه الصيغة.)
تلميح: في Excel 2003 أو إصدار أقل ، إذا كنت تريد استخدام الصيغة = EOMONTH (A2,0،XNUMX)، تحتاج إلى تثبيت حزمة أدوات التحليل بالضغط الأدوات > الوظائف الإضافية أول. انظر لقطات الشاشة:
احصل على تاريخ نهاية الشهر باستخدام الوظيفة المحددة في Excel
إذا كنت معتادًا على VBA ، فيمكنك استخدام رمز VBA أدناه للعثور على تاريخ نهاية الشهر.
1. صحافة F11 + البديل معًا على لوحة المفاتيح لفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. ثم اضغط إدراج > وحدة لإدراج نافذة وحدة جديدة. ثم انسخ رمز VBA التالي إلى النافذة.
VBA: الحصول على تاريخ نهاية الشهر.
Function LastDayInMonth(Optional pDate As Date = 0) As Date
'Updateby20140723
If pDate = 0 Then pDate = VBA.Date
LastDayInMonth = VBA.DateSerial(VBA.Year(pDate), VBA.Month(pDate) + 1, 0)
End Function
3. احفظ وأغلق النافذة. ثم حدد خلية واكتب هذه الصيغة = LastDayInMonth (A2) (يحتوي A2 على التاريخ الذي تريد الحصول على تاريخ نهاية الشهر منه) ، ثم اضغط أدخل مفتاح وسوف تحصل على تاريخ انتهاء الشهر.
ملاحظات: يتطلب VBA أيضًا تنسيق الخلايا الناتجة كتنسيق التاريخ قبل إدخال صيغة = LastDayInMonth (A2).
مقالات ذات صلة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!