كيفية تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين في Excel؟

يمكن أن يساعد فصل السلاسل الأبجدية الرقمية إلى عمودين - أحدهما للأرقام والآخر للحروف - في إدارة البيانات. في هذه المقالة، سأوضح لك طرقًا مفيدة لتقسيم هذه السلاسل إلى أعمدة منفصلة.

تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين باستخدام دالة معرفة من قبل المستخدم

تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين باستخدام Kutools لـ Excel

تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين باستخدام دالة معرفة من قبل المستخدم

على سبيل المثال، لدي نطاق من السلاسل الأبجدية الرقمية لتقسيمها إلى عمودين، كما هو موضح في لقطة الشاشة أدناه:

هنا، يمكنني إنشاء دالة معرفة من قبل المستخدم لحل هذه المهمة، يرجى القيام بما يلي:

1. اضغط مع الاستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.

كود VBA: فصل السلاسل الأبجدية الرقمية إلى عمودين:

Function RetNum(Str As String)
'updateby Extendoffice
    Dim xRegEx As Object
    Set xRegEx = CreateObject("vbscript.regexp")
    xRegEx.Global = True
    xRegEx.Pattern = "[^\d]+"
    RetNum = xRegEx.Replace(Str, "")
    Set xRegEx = Nothing
End Function
Function RetNonNum(Str As String)
    Dim xRegEx As Object
    Set xRegEx = CreateObject("vbscript.regexp")
    xRegEx.Global = True
    xRegEx.Pattern = "[\d]+"
    RetNonNum = xRegEx.Replace(Str, "")
    Set xRegEx = Nothing
End Function

3. بعد حفظ وإغلاق الكود، عد إلى ورقة العمل وأدخل هذه الصيغة =retnonnum(A2) في خلية فارغة. اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على الخلايا الأخرى، وسيتم استخراج جميع الأحرف الأبجدية من العمود المرجعي. انظر لقطة الشاشة:

4. استمر بإدخال هذه الصيغة: =retnum(A2) في خلية فارغة أخرى، واسحب مقبض التعبئة لأسفل إلى الخلايا التي تحتوي على هذه الصيغة، ثم يتم إرجاع جميع الأرقام كما هو موضح في لقطة الشاشة التالية:

تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين باستخدام Kutools لـ Excel

إذا كان لديك Kutools لـ Excel، باستخدام أداة تقسيم الخلايا الخاصة به، يمكنك بسرعة تقسيم السلاسل الأبجدية الرقمية إلى أعمدة منفصلة.

بعد تثبيت Kutools لـ Excel، يرجى القيام بما يلي:

1. حدد السلاسل الأبجدية الرقمية التي تريد فصلها.

2. انقر فوق Kutools > دمج وتقسيم > تقسيم الخلايا، انظر لقطة الشاشة:

3. في مربع الحوار تقسيم الخلايا، حدد تقسيم البيانات تحت قسم النوع، ثم اختر النص والرقم تحت قسم الفاصل، انظر لقطة الشاشة:

4. ثم انقر فوق الزر موافق، وستظهر مربع رسالة لتذكيرك باختيار الخلية التي تحتاج إلى تحديد موقع النتيجة المنفصلة فيها، انظر لقطة الشاشة:

5. وبعد ذلك انقر فوق موافق، يتم فصل الحروف الأبجدية والأرقام إلى عمودين في الحال، انظر لقطة الشاشة:

عرض توضيحي: تقسيم / فصل السلاسل الأبجدية الرقمية إلى عمودين باستخدام Kutools لـ Excel