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

حساب تاريخ البدء ربع السنة أو تاريخ الانتهاء بناءً على تاريخ معين باستخدام الصيغ
ماكرو VBA: حساب وتعبئة بداية وتاريخ الانتهاء ربع السنة تلقائيًا لمجموعة من التواريخ
حساب تاريخ البدء ربع السنة أو تاريخ الانتهاء بناءً على تاريخ معين باستخدام الصيغ
للحصول على بداية أو نهاية ربع السنة لأي تاريخ معين، يمكنك استخدام صيغ مباشرة في Excel—وهو حل مثالي للإشارة السريعة إلى الفترات الزمنية الرئيسية دون الحاجة إلى البحث اليدوي، خاصةً عند تطبيق الحساب على قائمة ذات حجم معقول.
توضّح الخطوات التالية كيفية حساب حدود أرباع السنة بكفاءة باستخدام صيغ Excel. ويُعد هذا النهج مثاليًا إذا كنت تفضّل تجنّب حلول VBA أو الإضافات، وترغب في اعتماد سير عمل قائم على الصيغ يُحدّث النتائج تلقائيًا مع أي تغيّر في بياناتك. ومع ذلك، في حالة التعامل مع مجموعات بيانات ضخمة تحتوي على آلاف الإدخالات أو نطاقات مختلطة/ديناميكية، فقد توفّر خيارات الأتمتة أو البرمجة قابلية توسع أفضل.
لحساب تاريخ البدء ربع السنة بناءً على تاريخ:
1. انقر داخل خلية فارغة تريد أن يظهر فيها تاريخ بدء ربع السنة، على سبيل المثال الخلية B2 إذا كانت تواريخك في العمود A.
2. أدخل الصيغة التالية:
=DATE(YEAR(A2),FLOOR(MONTH(A2)-1,3)+1,1) 3. اضغطEnter لتأكيد الأمر. بعد ذلك، اسحب مقبض التعبئة (المربع الصغير في الزاوية السفلية اليمنى للخلية) لأسفل لتطبيق الصيغة على الصفوف الأخرى حسب الحاجة، وسيتم بذلك حساب تاريخ البدء لكل ربع سنة بناءً على التواريخ المقابلة في العمود A.
ملاحظة: تأكد من صحة مراجع الخلايا؛ على سبيل المثال، استخدم A2 وA3 وما إلى ذلك، حسب موقع تواريخك. ويُوصى بتنسيق خلية النتيجة كـ«تاريخ» لعرضها بشكل صحيح.

تعمل هذه الصيغة على استخراج السنة من التاريخ الخاص بك وحساب الشهر الذي يوافق بداية ربع السنة، لتُرجع دائمًا اليوم الأول من ذلك الربع.
لحساب تاريخ الانتهاء ربع السنة بناءً على تاريخ:
1. حدد خلية فارغة لعرض تاريخ انتهاء ربع السنة فيها، مثل الخلية C2.
2. أدخل الصيغة التالية:
=DATE(YEAR(A2),((INT((MONTH(A2)-1)/3)+1)*3)+1,1)-1 3. اضغطEnter لتطبيق الصيغة، ثم اسحب مقبض التعبئة لأسفل بجانب بياناتك لحساب تاريخ انتهاء ربع السنة لجميع الصفوف.
تعمل الصيغة على إيجاد اليوم الأول من ربع السنة التالي، ثم تطرح منه يومًا واحدًا للحصول على اليوم الأخير الفعلي لربع السنة لكل تاريخ.

إذا كان جدولك يحتوي على تواريخ كثيرة، ففكّر في تحويل بياناتك إلى جدول Excel لتطبيق الصيغ تلقائيًا على الصفوف الجديدة. ولا تنسَ التأكد من تنسيق خلاياك كـ«تاريخ» لعرض النتائج بشكل صحيح.
احتياطات ونصائح:
- تفترض كلتا الصيغتين أن تواريخ المصدر هي تواريخ Excel صالحة. وقد تؤدي التواريخ غير الصحيحة أو تلك المنسَّقة كنص إلى حدوث أخطاء.
- إذا ظهر رقم تسلسلي بدلًا من التاريخ، فقم بتنسيق خلية النتيجة كـ«تاريخ قصير» أو «تاريخ طويل» من خلال مربع حوار «تعيين تنسيق الخلية».
- راجع إعدادات التاريخ الإقليمية الخاصة بك إذا ظهرت نتائج غير متوقعة.
- يتطلب تعديل الصيغة لتناسب أرباع السنة المالية (إذا كانت أرباع مؤسستك تبدأ من شهرٍ غير يناير) إدخال تعديلات مخصصة على الصيغة.
إذا واجهت أخطاءً غير مألوفة مثل #VALUE!، فتحقق من وجود خلايا فارغة أو غير مؤرخة في نطاق المصدر. ولإجراء تحديثات جماعية أو حسابات تلقائية عبر نطاقات تواريخ مختلفة، قد ترغب في النظر في نهج ماكرو VBA الموضّح أدناه.
ماكرو VBA: حساب وتعبئة بداية وتاريخ الانتهاء ربع السنة تلقائيًا لمجموعة من التواريخ
إذا كنت بحاجةٍ متكررةٍ إلى حساب تواريخ بداية ونهاية أرباع السنة لمجموعة كبيرة أو متغيرة من التواريخ، فإن ماكرو VBA يوفّر معالجةً سريعةً وآلية. يُعد هذا الأسلوب فعّالًا جدًّا في جداول البيانات الكبيرة، ويتيح دعم النطاقات الديناميكية، كما يساعد على تقليل الإدخال اليدوي والأخطاء المرتبطة به. ومع ذلك، يتطلب تمكين الماكرو وقد لا يكون مناسبًا في البيئات التي تتبع سياسات أمان صارمة.
المزايا:يُنفّذ العملية بأكملها تلقائيًا حتى مع مجموعات البيانات الضخمة، ويدعم النطاقات الديناميكية، ويقلل الأخطاء اليدوية.
القيود:يتطلب ملفات عمل مفعّلة للماكرو ومعرفة أساسية بمُحرر VBA؛ وقد تمنع بعض المؤسسات استخدام الماكرو.
اتبع هذه الخطوات لإعداد الماكرو واستخدامه:
1. اضغطAlt + F11 لفتح مُحررمايكروسوفت فيجوال بيسك للتطبيقات.
2. في نافذة VBA، انقرإدراج > وحدة نمطيةلإنشاء وحدة جديدة.
3. انسخ والصق كود VBA التالي في نافذة الوحدة:
Sub FillQuarterStartEndDates()
Dim rng As Range
Dim cell As Range
Dim startCol As Long
Dim endCol As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the date range to process:", xTitleId, rng.Address, Type:=8)
If rng Is Nothing Then Exit Sub
startCol = rng.Columns(rng.Columns.Count).Column + 1
endCol = rng.Columns(rng.Columns.Count).Column + 2
' Add headers if necessary
If rng.Rows(1).Row = 1 Or rng.Offset(-1, 0).Cells(1, 1).Value = "" Then
rng.Cells(1, rng.Columns.Count + 1).Value = "Quarter Start Date"
rng.Cells(1, rng.Columns.Count + 2).Value = "Quarter End Date"
End If
For Each cell In rng
If IsDate(cell.Value) Then
' Quarter start date
cell.Offset(0, rng.Columns.Count).Value = DateSerial(Year(cell.Value), ((Int((Month(cell.Value) - 1) / 3)) * 3) + 1, 1)
' Quarter end date
cell.Offset(0, rng.Columns.Count + 1).Value = DateSerial(Year(cell.Value), (Int((Month(cell.Value) - 1) / 3) + 1) * 3 + 1, 1) - 1
Else
cell.Offset(0, rng.Columns.Count).Value = "N/A"
cell.Offset(0, rng.Columns.Count + 1).Value = "N/A"
End If
Next cell
End Sub 4. عُد إلى Excel وحدد نطاق خلايا التواريخ التي تريد معالجتها.
5. اضغطF5 أو انقر زرتشغيل.
6. في مربع الحوار، أكد أو اختر النطاق الزمني الدقيق الذي تريد حسابه، ثم انقر «موافق».
سيقوم الماكرو تلقائيًا بإدراج عمودين جديدين—أحدهما لتاريخ بدء الربع والآخر لتاريخ نهاية الربع—بجانب النطاق المحدَّد، وتعبئتهما بالنتائج المحسوبة، أو بـ«غير متوفر» لأي إدخال غير مؤرَّخ.
ملاحظة:
- قم دائمًا بعمل نسخة احتياطية من بياناتك قبل تشغيل الماكرو، تحسبًا لأي عمليات استبدال غير مقصودة.
- يُحدد الماكرو الإدخالات غير الصالحة أو الخلايا الفارغة ويضع عليها علامة «غير متوفر» لتسهيل اكتشاف المشكلات.
- إذا واجهت أي أخطاء أو لم يُنفَّذ الماكرو، فتأكد من تفعيل الماكرو في إعدادات Excel، وتحقق من عدم وجود أوراق محمية تمنع إنشاء أعمدة جديدة.
- لتخصيص منطق ربع السنة للسنة المالية التي تبدأ في أشهر أخرى غير يناير، ستحتاج إلى تعديل الكود وفقًا لذلك.
باختصار، تتيح لك الطريقتان إنشاء حدود فترات ربع السنة بما يتوافق مع سير عملك المخصص. فكّر في استخدام الصيغ للحصول على نتائج سريعة عند التعامل مع مجموعات بيانات صغيرة، واستخدم الماكرو لأتمتة المهام الأكبر حجمًا أو المتكررة. وإذا واجهت أي مشكلات أو نتائج غير متوقعة، فتأكد من جديد من تنسيق التواريخ ودقة تحديد النطاقات. فالحفاظ على هيكلة بيانات متسقة يقلل من احتمال وقوع الأخطاء ويعزز الكفاءة، سواءً اعتمدت على الحسابات اليدوية أو الآلية.

افتح سحر إكسل مع KUTOOLS AI
- التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
- الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
- برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
- تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
- ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل