KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن حساب تاريخ بدء أو انتهاء ربع السنة استنادًا إلى تاريخ معيّن في Excel؟

المؤلفXiaoyangتاريخ التعديل

عند التعامل مع بيانات الأعمال أو السجلات المالية أو مهام التخطيط المرتبطة بأرباع السنة، غالبًا ما تحتاج إلى تحديد تاريخ بداية أو نهاية ربع السنة المقابل لمجموعة من التواريخ المُعطاة. على سبيل المثال، قد ترغب في استخراج تواريخ بداية ونهاية ربع السنة بسرعة لكل معاملة أو حدث مسجَّل في جدولك. وعلى الرغم من أن 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 for excel ai

افتح سحر إكسل مع KUTOOLS AI

  • التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
  • الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
  • برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
  • تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
  • ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
حسِّن قدراتك في إكسل بأدوات مدعومة بالذكاء الاصطناعي.حمِّل الآنوجرِّب الكفاءة كما لم تفعل من قبل!

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

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

عزِّز مهاراتك في 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.

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