3 طرق سهلة لتحويل اسم الشهر إلى رقم في Excel
في Excel، قد تكون هناك أوقات تحتاج فيها إلى تحويل أسماء الأشهر إلى الأرقام المقابلة لها لتسهيل تحليل البيانات والمعالجة. سيغطي هذا البرنامج التعليمي ثلاث طرق لتحويل أسماء الأشهر إلى أرقام: باستخدام صيغة، باستخدام Kutools لـ Excel، وباستخدام كود VBA. سواء كنت مبتدئًا أو مستخدمًا متمرسًا لبرنامج Excel، ستساعدك هذه الطرق على تعزيز إنتاجيتك.
تحويل اسم الشهر إلى رقم في Excel
تغطي هذه القسم ثلاث طرق لتحويل أسماء الأشهر إلى أرقام: باستخدام صيغة، باستخدام Kutools لـ Excel، وباستخدام كود VBA. تم تصميم كل طريقة لتلبية تفضيلات المستخدمين المختلفة والقدرات التقنية، مما يضمن المرونة وسهولة الاستخدام عبر مختلف سيناريوهات Excel.
استخدم الصيغة لتحويل اسم الشهر إلى رقم في Excel
استخدام صيغة هو طريقة بسيطة ومرونة لتحويل أسماء الأشهر إلى أرقام. وظائف الصيغ المدمجة في Excel قوية، مما يسمح لنا بإنشاء صيغة تقوم تلقائيًا بتحويل أسماء الأشهر. دعنا نستعرض الخطوات لتحقيق ذلك.
اكتب الصيغة التالية في خلية فارغة واضغط على مفتاح Enter. بعد ذلك، حدد الخلية التي تحتوي على الصيغة واسحب مقبض التعبئة الخاص بها لأسفل لتطبيقها على باقي النطاق.
=MONTH(A2&1)
تحويل التاريخ بسهولة إلى الرقم المقابل للشهر باستخدام Kutools
إذا كنت تريد تحويل تاريخ كامل إلى اسم الشهر المقابل وتفضل نهجًا أبسط، فإن Kutools لـ Excel أداة مفيدة للغاية. يمكن أن تُبسّط ميزات "تطبيق تنسيق التاريخ" الخاصة به سير عملك. إليك الخطوات لتحويل التواريخ إلى الأرقام المقابلة للأشهر باستخدام Kutools لـ Excel.
- حدد التواريخ التي تريد تحويلها إلى رقم الشهر، ثم حدد "Kutools" > "تنسيق" > "تطبيق تنسيق التاريخ".
- في مربع الحوار المنبثق "تطبيق تنسيق التاريخ"، اختر الخيار "03" في "قائمة تنسيق التاريخ"، ثم انقر فوق "موافق". يمكنك معاينة النتائج في الوقت الفعلي في لوحة "معاينة".
النتيجة
تم تحويل جميع التواريخ في النطاق المحدد إلى أسماء الأشهر المقابلة فورًا.
استخدم كود VBA لتحويل اسم الشهر إلى رقم في Excel
1. اضغط مع الاستمرار على زر ALT واضغط على F11 على لوحة المفاتيح لفتح نافذة "Microsoft Visual Basic for Application".
2. انقر فوق "إدراج" > "وحدة"، وانسخ كود VBA في الوحدة.
كود VBA: تحويل اسم الشهر إلى رقم
Sub ChangeNum()
'Updateby20140311
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value <> "" Then
Rng.Value = Month(DateValue("03/" & Rng.Value & "/2014"))
End If
Next
End Sub
3. انقر فوق "تشغيل" لتشغيل كود VBA، وسيظهر لك مربع حوار KutoolsforExcel لتحديد نطاق من الخلايا بأسماء الأشهر التي تريد تحويلها إلى أرقام، ثم انقر فوق موافق، وسيتم تحويل أسماء الأشهر المحددة إلى أرقام الأشهر. شاهد لقطة الشاشة:
نصيحة: قد يؤدي استخدام كود VBA أعلاه إلى فقدان بياناتك الأصلية، يمكنك حفظها قبل تشغيل كود VBA.
تحويل التاريخ إلى رقم الشهر أو اسم الشهر أو تنسيقات تاريخ أخرى باستخدام Kutools لـ Excel
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!