كيفية تنسيق الرقم كرقم ترتيبي (1st 2nd 3rd) في Excel؟
في بعض الحالات ، نحتاج إلى تنسيق الرقم على أنه الأول والثاني والثالث وما إلى ذلك عندما نرتب على النحو الموضح أدناه. ومع ذلك ، هل تعرف كيفية تنسيق هذه الأرقام الأصلية كأرقام ترتيبية في Excel؟ بشكل عام ، لا توجد وظيفة مضمنة لتحويل الرقم إلى المرتبة الأولى في Excel ، ولكن هنا يمكنني تقديم بعض الحيل حول هذه المشكلة.
تنسيق الرقم على أنه ترتيبي مع VBA
تنسيق رقم ترتيبي مع كوتولس ل إكسيل
تنسيق الرقم على أنه ترتيبي مع VBA
لتنسيق الرقم كترتيبي ، إليك رمز ماكرو يمكن أن يساعدك.
1. صحافة ALT + F11 مفاتيح للتمكين ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق أدناه 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 على سبيل المثال ، وأدخل هذه الصيغة = إضافة (B2)، B2 هو الرقم الذي تستخدمه ، ثم اضغط أدخل مفتاح ، ثم اسحب مقبض الملء التلقائي فوق الخلايا التي تريد تطبيق هذه الصيغة. انظر لقطة الشاشة:
تنسيق رقم ترتيبي مع كوتولس ل إكسيل
إذا لم تكن جيدًا في تنفيذ تعليمات برمجية الماكرو ، يمكنك محاولة التقديم كوتولس ل إكسيلالصورة تحويل رقم إلى ترتيبي فائدة ، والتي تحتاج فقط إلى نقرة واحدة للتعامل مع الوظيفة.
كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. |
بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:
حدد الأرقام التي تريد تنسيقها كأرقام ترتيبية ، وانقر فوق كوتولس > وصف المنتج > تحويل رقم إلى ترتيبي. انظر لقطة الشاشة:
تحويل رقم إلى ترتيبي
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
