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، 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد