كيفية تنسيق الأرقام كأرقام ترتيبية (الأول، الثاني، الثالث) في Excel؟
في بعض الحالات، نحتاج إلى تنسيق الأرقام على شكل الأول، الثاني، الثالث، إلخ، عند تصنيفها كما هو موضح في لقطة الشاشة أدناه. ومع ذلك، هل تعرف كيفية تحويل هذه الأرقام الأساسية إلى أرقام ترتيبية في Excel؟ بشكل عام، لا توجد وظيفة مضمنة لتحويل الرقم إلى الأول في Excel، ولكن هنا يمكنني أن أقدم لك بعض الحيل حول هذه المشكلة.
تنسيق الرقم كرقم ترتيبي باستخدام VBA
تنسيق الرقم كرقم ترتيبي باستخدام Kutools لـ Excel
تنسيق الرقم كرقم ترتيبي باستخدام VBA
لتنسيق الرقم كرقم ترتيبي، إليك رمز ماكرو يمكن أن يساعدك.
1. اضغط على مفاتيح Alt + F11 لتمكين نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، والصق الكود التالي VBA في نص الوحدة. انظر لقطة الشاشة:
VBA: تنسيق الرقم كرقم ترتيبي
Function Addth(pNumber As String) As String
'UpdatebyExtendoffice20160628
Select Case CLng(VBA.Right(pNumber, 1))
Case 1
Addth = pNumber & "st"
Case 2
Addth = pNumber & "nd"
Case 3
Addth = pNumber & "rd"
Case Else
Addth = pNumber & "th"
End Select
Select Case VBA.CLng(VBA.Right(pNumber, 2))
Case 11, 12, 13
Addth = pNumber & "th"
End Select
End Function
3. ثم حدد خلية فارغة بجانب الرقم الذي تريد تنسيقه كرقم ترتيبي، C2 على سبيل المثال، وأدخل هذه الصيغة =Addth(B2)، B2 هو الرقم الذي تستخدمه، واضغط Enter مفتاح، ثم اسحب مقبض التعبئة التلقائية عبر الخلايا التي تريد تطبيق هذه الصيغة عليها. انظر لقطة الشاشة:
تنسيق الرقم كرقم ترتيبي باستخدام Kutools لـ Excel
إذا لم تكن جيدًا في تنفيذ رمز الماكرو، يمكنك تجربة استخدام أداة تحويل الرقم إلى ترتيبي من Kutools لـ Excel، والتي تحتاج فقط إلى نقرة واحدة للتعامل مع المهمة.
بعد تثبيت Kutools لـ Excel مجانًا ، يرجى القيام بما يلي:
حدد الأرقام التي تريد تنسيقها كأرقام ترتيبية، وانقر فوق Kutools > نص > تحويل الرقم إلى ترتيبي. انظر لقطة الشاشة:
تحويل الرقم إلى ترتيبي
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد