كيفية تنسيق الأرقام كأرقام ترتيبية (الأول، الثاني، الثالث) في 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 > نص > تحويل الرقم إلى ترتيبي. انظر لقطة الشاشة:
 

تحويل الرقم إلى ترتيبي