كيفية إزالة الأصفار البادئة من سلسلة نصية أبجدية رقمية في إكسيل؟
لنفترض أن لدي قائمة بالسلاسل النصية التي تتضمن بعض الأصفار البادئة ، والآن أريد إزالة جميع الأصفار البادئة من السلاسل النصية للحصول على النتيجة التالية ، كيف يمكنني حل هذه المهمة في Excel بسرعة وسهولة؟
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدية الرقمية باستخدام صيغة الصفيف
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدي الرقمي باستخدام الوظيفة المعرفة من قبل المستخدم
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدية الرقمية باستخدام Kutools for Excel
أضف الأصفار البادئة إلى سلاسل نصية باستخدام Kutools for Excel
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدية الرقمية باستخدام صيغة الصفيف
في Excel ، لا توجد طريقة مباشرة لإزالة الأصفار البادئة من السلاسل ، ولكن يمكنك تطبيق صيغة الصفيف التالية لحلها.
1. الرجاء كتابة صيغة الصفيف هذه: =MID(A2,MATCH(TRUE,(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)<>"0"),0),LEN(A2)) (A2 هي الخلية التي تريد إزالة الأصفار البادئة منها) في خلية فارغة حيث تريد الحصول على النتيجة ، C2 ، على سبيل المثال ، ثم اضغط كترل + شيفت + إنتر مفاتيح معًا للحصول على النتيجة الصحيحة ، انظر لقطة الشاشة:
2. ثم حدد الخلية C2 واسحب مقبض التعبئة لأسفل إلى الخلايا التي تريد أن تحتوي على هذه الصيغة ، تمت إزالة جميع الأصفار البادئة من السلاسل النصية ، انظر لقطة الشاشة:
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدي الرقمي باستخدام الوظيفة المعرفة من قبل المستخدم
باستثناء صيغة الصفيف أعلاه ، يمكن أن تقدم لك تعليمات VBA البرمجية التالية أيضًا ، يرجى القيام بما يلي:
1. اضغط باستمرار على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: إزالة الأصفار البادئة من سلاسل النص الأبجدي الرقمي:
Function RemoveLeadingZeros(Str As String)
'updateby Extendoffice
Do While Left(Str, 1) = "0"
Str = Mid(Str, 2)
Loop
RemoveLeadingZeros = Str
End Function
3. ثم احفظ وأغلق هذا الرمز ، عد إلى ورقة العمل ، وأدخل هذه الصيغة: = removeleadingzeros (A2) (A2 هي الخلية التي تريد إزالة الأصفار البادئة منها) في خلية فارغة ، ثم اسحب مقبض التعبئة لأسفل إلى الخلايا التي تريد تطبيق هذه الصيغة ، وتم حذف جميع الأصفار البادئة من السلاسل النصية ، انظر لقطة الشاشة :
قم بإزالة الأصفار البادئة من سلاسل النص الأبجدية الرقمية باستخدام Kutools for Excel
إذا كان لديك كوتولس ل إكسيل، بما لديها إزالة الأصفار البادئة ميزة ، يمكنك إزالة جميع الأصفار البادئة من خلايا متعددة بنقرة واحدة.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. حدد الخلايا التي تريد إزالة كافة الأصفار البادئة ، ثم انقر فوق كوتولس > نص > إزالة الأصفار البادئة، انظر لقطة الشاشة:
2. وبعد ذلك تم حذف جميع الأصفار البادئة في السلاسل النصية دفعة واحدة ، انظر الصورة:
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
أضف الأصفار البادئة إلى سلاسل نصية باستخدام Kutools for Excel
في بعض الأحيان ، قد ترغب في إدراج عدد من الأصفار البادئة قبل السلاسل النصية مرة واحدة ، وفي هذه الحالة ، قد ترغب في إدخال ملف كوتولس ل إكسيلالصورة إضافة نص يمكن أن تساعدك الأداة المساعدة على إنهاء هذه المهمة بأسرع ما يمكن.
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. حدد خلايا السلسلة النصية التي تريد إضافة الأصفار البادئة إليها.
2. ثم اضغط كوتولس > نص > إضافة نص، انظر لقطة الشاشة:
3. في إضافة نص في مربع الحوار ، أدخل الأصفار التي تريد إضافتها قبل السلاسل النصية في ملف نص مربع ، ثم حدد قبل الشخصية الأولى من الموقع الحالي، انظر لقطة الشاشة:
4. ثم اضغط Ok or التقديم زر ، تم إدخال العدد المحدد من الأصفار قبل جميع السلاسل النصية المحددة ، انظر الصورة:
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!