كيف تعيّن تاريخًا ليكون أول يوم في الشهر باستخدام Excel؟
عند العمل مع مجموعات البيانات في Excel، قد تجد نفسك غالبًا بحاجة إلى توحيد التواريخ—مثل تحويل أي تاريخ إلى اليوم الأول من شهره. يُعدّ هذا الأمر بالغ الفائدة في التحليلات المالية، وإعداد التقارير الشهرية، أو تجميع البيانات حسب الشهر بغض النظر عن اليوم، كما في المثال الموضّح هنا. ويقدّم لك هذا الدليل صيغتين عمليتين في Excel بالإضافة إلى شفرة VBA يمكنك استخدامها لتحويل أي تاريخ بسهولة إلى اليوم الأول من الشهر المقابل له.
تعيين أو تحويل التاريخ إلى اليوم الأول من الشهر المحدد باستخدام الصيغ
تعيين أو تحويل التاريخ إلى اليوم الأول من الشهر المحدد باستخدام VBA
تعيين أو تحويل التاريخ إلى اليوم الأول من الشهر المحدد باستخدام الصيغ
لتحويل قائمة من التواريخ العشوائية بسرعة إلى اليوم الأول من كل شهر مرتبط بها، يوفّر Excel بعض الصيغ المباشرة. ويُعد هذا النهج فعّالًا جدًّا عند الحاجة إلى توحيد التواريخ لأغراض الجداول المحورية، أو التجميعات الشهرية، أو مراجعة البيانات الدورية.
1. انقر على خلية فارغة بجانب تاريخك (على سبيل المثال، استخدم الخلية)B2 إذا كان تاريخك الأصلي موجودًا فيA2). ثم أدخل الصيغة التالية:
=EOMONTH(A2,-1)+12. بعد إدخال الصيغة، اضغط علىEnter. ستعرض الخلية اليوم الأول من الشهر للتاريخ الموجود فيA2.
3. لتطبيق هذه الصيغة على باقي تواريخك، حرّك مؤشر الماوس إلى الزاوية السفلية اليمنى للخلية حتى يظهر مقبض الملء ()+رمز). ثم انقر واسحب مقبض الملء لأسفل عبر نطاق الخلايا التي تريد تحويلها—وسيتم تحويل كل تاريخ تلقائيًا إلى اليوم الأول من شهره! انظر لقطة الشاشة:
استكشاف الأخطاء والإصلاحات والنصائح:
- إذا ظهرت نتيجة الصيغة كرقم تسلسلي، فقد تحتاج إلى تنسيق الخلية كتاريخ. انقر بزر الماوس الأيمن على الخلية، ثم اخترتعيين تنسيق الخلية، وحدد تنسيق التاريخ.
- تأكد من أن القيم في العمود A تم إدخالها كتواريخ صالحة في Excel، وإلا فقد تُرجع الصيغ أخطاءً.
ملاحظات:
1. هناك صيغة بديلة يمكنك استخدامها، وقد تكون مفضّلة إذا كنت تبحث عن بنية أبسط أو إذا لم تكن دالةEOMONTH متوفرة في إصدار Excel الخاص بك. في خلية فارغة، أدخل:
=DATE(YEAR(A2),MONTH(A2),1)تستخرج هذه الصيغة السنة والشهر مباشرةً من التاريخ الخاص بك، وتحدد اليوم كـ 1، مما يمنحك أول يوم في الشهر. وكما سبق، يمكنك سحب الصيغة لأسفل لملء باقي الخلايا في العمود.
2. في كلتا الصيغتين، يجب استبدالA2 بمراجع خلية التاريخ الذي تريد تحويله. غيّر مرجع الخلية إذا كانت بياناتك موجودة في عمود مختلف.
القابلية للاستخدام والقيود:
- تناسب هذه الطرق أوراق عمل Excel القياسية. إذا كنت تعمل مع مجموعات بيانات كبيرة أو تحتاج إلى أتمتة هذه العملية عبر عدة ملفات، ففكّر في استخدام VBA أو أدوات الدُفعات الإضافية لتعزيز الكفاءة.
- تعمل الصيغ بشكل أفضل مع أعمدة تواريخ معرَّفة بوضوح—فقد تتطلب البيانات المختلطة أو السلاسل النصية التي تشبه التواريخ تنظيفًا مسبقًا.
تعيين أو تحويل التاريخ إلى اليوم الأول من الشهر المحدد باستخدام VBA
بالنسبة للمستخدمين الذين يحتاجون غالبًا إلى تنفيذ هذه العملية عبر مصنفات مختلفة أو مع أعداد كبيرة جدًّا من التواريخ، فإن استخدام ماكرو VBA يمكن أن يوفّر وقتًا ثمينًا. ويُعد هذا الأسلوب مثاليًا أيضًا إذا رغبت في تحويل أعمدة متعددة دفعة واحدة أو أتمتة العملية بالكامل. إليك كيفية تنفيذه:
1. انتقل إلىأدوات المطور > Visual Basic لفتح محرر VBA. في نافذة المحرر، انقر علىإدراج > وحدة نمطية (Module)، ثم الصق الشفرة التالية:
Sub DatesToFirstOfMonth()
Dim rng As Range
Dim cell As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range for conversion", xTitleId, rng.Address, Type:=8)
For Each cell In rng
If IsDate(cell.Value) Then
cell.Value = DateSerial(Year(cell.Value), Month(cell.Value), 1)
End If
Next cell
End Sub2. بعد إدخال الشفرة، انقر على زر
(تشغيل) أو اضغط علىF5 لتنفيذ الماكرو. سيتم مطالبتك بتحديد نطاق—اختر النطاق الذي يحتوي على تواريخك، وسيتم تحويل جميع التواريخ المحددة تلقائيًا إلى اليوم الأول من أشهرها المقابلة.
- إذا ظهر خطأ «عدم تطابق النوع» (Type Mismatch)، فتأكد من أن الخلايا المحددة تحتوي على تواريخ صالحة.
- تذكّر دائمًا حفظ عملك قبل تشغيل شفرة VBA، لأن وحدات الماكرو لا يمكن التراجع عنها باستخدام Ctrl+Z.
باستخدام هذه الخيارات، يمكنك بسهولة تحويل أي قائمة تواريخ إلى اليوم الأول من شهرها—سواء كنت تفضل استخدام الصيغ أو أتمتة المهمة عبر VBA. اختر الطريقة الأنسب لسير عملك وحجم بياناتك. وإذا واجهت أخطاءً أو نتائج غير متوقعة، فتأكد من تنسيق الخلية ومراجع الخلايا، وفكّر في استخدام أداة Excel نص إلى أعمدةلتنظيف قيم التواريخ الغامضة مسبقًا.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل