KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن استخراج النص فقط من سلسلة أبجدية رقمية في Excel؟

المؤلفصنتاريخ التعديل

في العديد من مهام Excel الواقعية، قد تصادف خلايا تحتوي على مزيج من الأحرف والأرقام—ما يُعرف بالسلاسل الأبجدية الرقمية. فعلى سبيل المثال، تُعدّ بيانات مثل "Order2058" أو «User_15A» أو "ID1234B" شائعةً جدًّا في تصدير التقارير ومخرجات قواعد البيانات أو الرموز القياسية. وأحيانًا، ولأغراض التحليل أو إعداد التقارير، قد تحتاج إلى فصل واستخراج الجزء النصي فقط، مع استبعاد جميع العناصر الرقمية. يرشدك هذا المقال عبر عدة طرق عملية لاستخراج الأحرف النصية فقط من السلاسل الأبجدية الرقمية في Excel، مع عرض سيناريوهات الاستخدام النموذجية، والاحتياطات الواجب اتخاذها، ونصائح فعّالة لاستكشاف الأخطاء وإصلاحها.

لقطة شاشة لاستخراج النص فقط من سلسلة أبجدية رقمية

استخراج النص فقط من سلسلة أبجدية رقمية باستخدام دالة مُعرَّفة من قبل المستخدم (UDF) في Excel

نظرة عامة

  • المزايا:استخراج ديناميكي عبر مجموعات بيانات ضخمة؛ أبسط بكثير من صيغ ورقة العمل المعقدة؛ وقابلة لإعادة الاستخدام في أي ملف عمل.
  • القيود:يتطلب تفعيل وحدات الماكرو وحفظ الملف بصيغة.xlsm؛ حيث تقوم الدوال المخصصة بإعادة الحساب وقد تؤثر على الأداء عند التعامل مع نطاقات كبيرة جدًّا.

إذا كنت مرتاحًا لاستخدام VBA، يُمكّنك إنشاء دالة مخصصة معرَّفة من قِبَل المستخدم (UDF) من استخراج أحرف النص مباشرةً من أي سلسلة أبجدية رقمية—وهو حلٌّ مثالي عندما تصبح الدوال المضمنة غير كافية أو معقَّدة أكثر من اللازم.

نظرة سريعة على الخطوات المتبعة:

1. حدد أي خلية تريد إدخال صيغة الاستخراج فيها، ثم اضغط علىAlt + F11 لفتح محررMicrosoft Visual Basic for Applications.

2. في محرر VBA، انقر علىإدراج > وحدة نمطيةلإنشاء وحدة جديدة. ثم الصق الكود التالي في الوحدة.

VBA: استخراج الأحرف فقط (ASCII A–Z)

Function TextOnly(pWorkRng As Range) As String
'Updatebyextendoffice
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
For xIndex = 1 To VBA.Len(xValue)
    If Not VBA.IsNumeric(VBA.Mid(xValue, xIndex, 1)) Then
        OutValue = OutValue & VBA.Mid(xValue, xIndex, 1)
    End If
Next
TextOnly = OutValue
End Function

3. عُد إلى ورقة العمل وأدخل=TextOnly(A1)في خلية فارغة (استبدل)A1 بالخلية المستهدفة). اضغط علىEnter، ثم اسحب مقبض التعبئة لتطبيق الصيغة على العمود بأكمله. ستعرض النتيجة الأحرف النصية المستخرجة فقط من كل سلسلة.

هذه الطريقة لا تُعدّل بياناتك الأصلية — بل تعرض النتائج في خلايا أو أعمدة جديدة، مما يحافظ على البيانات الأصلية سليمةً دون أي تغيير.

استكشاف الأخطاء ونصائح

  • تمكين وحدات الماكرو وتنسيق الحفظ:تأكد من تفعيل وحدات الماكرو واحفظ الملف بالصيغة.xlsm لضمان بقاء الدالة المُعرَّفة من قبل المستخدم (UDF) نشطة.
  • الأحرف فقط حسب التصميم:تزيل الدالة الأرقام وعلامات الترقيم والرموز. مرِّر القيمةTRUE كمعامل ثانٍ للحفاظ على المسافات (مثال: =TextOnly(A1, TRUE)).
  • الأحرف ذات التشكيل أو غير ASCII:النمط البسيط[A-Za-z] يستثني أحرفًا مثلé, ü. إذا كنت بحاجة إلى دعم أبجديات أوسع، ففكّر في استخدام إصدار يعتمد على التعبيرات النمطية (RegExp) ووسّع نطاقات الأحرف (مثال: [A-Za-zÀ-ÖØ-öø-ÿ]) أو قم بتوحيد النص أولًا.
  • الخلايا الفارغة أو التي تحتوي على أخطاء:تُرجع الدالة المُعرَّفة من قِبل المستخدم (UDF) سلسلة فارغة عند معالجتها لخلايا فارغة أو تحتوي على قيم خطأ.
  • الأداء:تُعاد حساب الدوال المُعرَّفة من قبل المستخدم (UDFs) مع الورقة. وللحصول على أفضل أداء في النطاقات الكبيرة جدًّا، يُفضَّل تحويل النتائج إلى قيم بعد الاستخراج.

استخراج النص فقط من سلسلة أبجدية رقمية باستخدام Kutools لـ Excel

إذا كنت تفضّل حلاً أسرع ولا يتطلب كتابة أكواد، فإنKutools لـ Excelيوفّر طريقة ملائمة لإزالة الأرقام غير المرغوب فيها والأحرف غير الحرفية من الخلايا. هذه الطريقة مثالية للمستخدمين الذين يُجرين بانتظام تنظيف النصوص، أو يتعاملون مع بيانات ضخمة، أو يرغبون في تجنّب كتابة أكواد VBA.

نظرة عامة

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

Kutools لـ Excelيوفّر ميزةحذف الأحرف المحددةالتي تُمكّنك من إزالة المحتوى غير الحرفي من الخلايا المحددة بكفاءة.

Kutools لـ Excelيتضمّن أكثر من300 أداة مفيدة لـ Excel لتبسيط عملك. جرّبه مجانًا دون قيود لمدة30 يومًا. احصل عليه الآن

إليك كيفية استخراج الأحرف فقط:

1. حدد نطاق الخلايا التي تحتوي على السلاسل الأبجدية الرقمية التي ترغب في معالجتها.

2. انتقل إلىKutools > نص > حذف الأحرف المحددة. سيظهر مربع حوار. انظر لقطة الشاشة:

فتح مربع حوار Kutools لإزالة الأحرف

3. في مربع الحوارحذف الأحرف المحددة، فإن أسهل طريقة للاحتفاظ بالأحرف فقط هي تحديد خيارغير الأبجدي(يُسمّى أحيانًا)غير ألفا). يؤدي هذا إلى إزالة كل شيء باستثناء الأحرف من A إلى Z. إذا لم يكن هذا الخيار متاحًا في إصدارك، فحدد خيارَيرقميوغير القابلة للطباعة، واستخدم (اختياريًا) خيارمخصصلإزالة الرموز التي لا تريد الاحتفاظ بها. انظر لقطة الشاشة:

اختر غير أبجدي لإزالة جميع الأحرف غير الحرفية

4. انقر علىموافق. سيقوم Kutools بمعالجة التحديد وإزالة كل المحتوى غير الحرفي، تاركًا أجزاء النص فقط في الخلايا المحددة.

استكشاف الأخطاء ونصائح

  • تغيير في الموقع:يقوم هذا الإجراء باستبدال الخلايا المحددة. انقلها إلى موقع جديد أولًا إذا كنت بحاجة إلى الاحتفاظ بالبيانات الأصلية.
  • الاحتفاظ بأحرف معينة:للاحتفاظ بالمسافات أو الرموز (مثل الواصلات)، تجنّب خيارغير الأبجدي، وبدلاً من ذلك اجمع بين خياراترقميوغير القابلة للطباعة، بالإضافة إلى خيارمخصصللتحكم الدقيق.

تعرف على المزيد حول حذف الأحرف المحددة

يُعدّ نهج Kutools الأفضل لمهام التنظيف لمرة واحدة، ويعمل بكفاءة على مجموعات البيانات الصغيرة والكبيرة على حدٍّ سواء. أما إذا كنت بحاجة إلى نتيجة ديناميكية (تُحدَّث تلقائيًا)، ففكِّر في استخدام صيغة أو دالة UDF مبنية على VBA بدلاً من ذلك.

استخراج النص فقط من سلسلة أبجدية رقمية باستخدام صيغة Excel

للمستخدمين الباحثين عن حلٍ لا يعتمد على VBA أو الإضافات، يمكن استخراج النص حرفًا بحرف باستخدام صيغ Excel الأصلية. ويُعد هذا الحل مثاليًا لمجموعات البيانات التي تتطلب استخراجًا ديناميكيًا يعتمد كليًّا على الصيغ، خاصةً إذا كانت وحدات الماكرو أو أدوات الجهات الخارجية غير متاحة في بيئة عملك.

إليك كيفية تنفيذ ذلك باستخدام صيغة مصفوفة:

1.حدد خلية فارغة تريد أن تظهر فيها النتيجة (على سبيل المثال، B1)، وأدخل الصيغة التالية (تحتفظ بالأحرف من A إلى Z فقط):

=TEXTJOIN("",
 TRUE,
 IF(
   (CODE(MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))>=65)*
   (CODE(MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))<=90) +
   (CODE(MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))>=97)*
   (CODE(MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))<=122),
   MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1),
   ""
 )
)

2. بعد كتابة الصيغة، اضغطCtrl+Shift+Enter إذا كنت تستخدم إكسل2019 أو إصدارًا أقدم (يحوّلها ذلك إلى صيغة صفيفية). أما إذا كنت تستخدم إكسل من مايكروسوفت365 أو إكسل2021 أو إصدارات أحدث، فما عليك سوى الضغط علىEnter، لأن هذه الإصدارات تدعم صيغ الصفائف الديناميكية بشكلٍ أصلي.

استبدلA1 بمرجع الخلية التي تحتوي على السلسلة الأبجدية الرقمية الخاصة بك. ستُعيد الصيغة الأحرف فقط من كل سلسلة. ولتطبيق الصيغة على صفوف إضافية، اسحب مقبض التعبئة لأسفل من الخلية B1.

شرح المعلمات:

  • MID وROW(INDIRECT(...)) تقومان بسرد كل حرف في الخلية المستهدفة.
  • CODE يتحقق من نطاقات ASCII 65–90 (A–Z) و97–122 (a–z) للاحتفاظ بالأحرف فقط.
  • TEXTJOIN تدمج الأحرف المحفوظة في سلسلة واحدة.
  • تعمل بشكل أفضل مع نصوص معتدلة الطول (أقل من)1,000 حرفٍ لكل خلية)؛ فقد يؤدي النص الطويل جدًّا إلى بطء في الأداء.

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

استكشاف الأخطاء واقتراحات موجزة

  • إذا ظهرت أخطاء (مثل)#VALUE!)، فتحقق من إصدار Excel الخاص بك، وتأكد من إدخال الصيغة كمصفوفة (Ctrl+Shift+Enter لإصدار 2019 أو أقدم).
  • بعد الاستخراج، راجع النتائج بحثًا عن مسافات أو أحرف غير متوقعة وقم بتعديلها حسب الحاجة. واختر بين Kutools وVBA والصيغ بما يناسب سير عملك.

مقالات ذات صلة:

أفضل أدوات الإنتاجية لمكتبتك

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في 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.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل