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

- باستخدام صيغة(Excel 2021 والإصدارات الأحدث)
- باستخدام KUTOOLS AI Aide(ذكي وفعّال)
- باستخدام أداة مذهلة(بنقرة واحدة)
- باستخدام كود VBA
إزالة الأحرف غير الرقمية من الخلايا في Excel
في هذا القسم، سنقدّم أربع طرق فعّالة لإزالة الأحرف غير الرقمية من خلايا Excel، مصممة خصيصًا لتتناسب مع إصدارات Excel المختلفة ومستويات خبرة المستخدمين.
إزالة الأحرف غير الرقمية من خلايا Excel باستخدام صيغة
لإزالة الأحرف غير الرقمية من خلايا Excel، استخدم صيغة تعتمد على دالةTEXTJOIN .
الخطوة 1: تحديد خلية وتطبيق الصيغة
في الخلية C2، طبِّق الصيغة أدناه، ثم اضغط مفتاح Enter للحصول على النتيجة.
=TEXTJOIN("",TRUE,IFERROR(MID(A2,SEQUENCE(LEN(A2)),1)+0,""))+0

الخطوة 2: تطبيق الصيغة على خلايا أخرى والحصول على جميع النتائج
بعد حساب النتيجة الأولية، اسحب مقبض التعبئة من خلية الصيغة (C2 في هذا المثال) لأسفل لتطبيق الصيغة على الخلايا الأخرى حتى تصل إلى الخلية C8.

- LEN(A2): يُعطي طول النص الموجود في الخلية A2.
- SEQUENCE(LEN(A2))يُنشئ قائمة بأرقام تتراوح من 1 إلى طول السلسلة، حيث يتوافق كل رقم مع موضع حرف فيها.
- MID(A2, SEQUENCE(LEN(A2)), 1)يتم استخراج كل حرف من الخلية A2 واحدًا تلو الآخر.
- +0يحاول تحويل كل حرف إلى رقم؛ وإذا لم يكن الحرف رقمًا، فسيؤدي ذلك إلى خطأ.
- IFERROR(..., «»)إذا تسبَّب تحويل الحرف في حدوث خطأ (أي أنه ليس رقمًا)، يُستبدل بسلسلة فارغة.
- TEXTJOIN(«», TRUE, ...)يُعيد تجميع جميع الأحرف في سلسلة واحدة، مع تخطي السلاسل الفارغة (أي الأحرف غير الرقمية التي تم إزالتها).
- +0 at the endيحول السلسلة النهائية من الأرقام مرة أخرى إلى قيمة رقمية.
إزالة الأحرف غير الرقمية من خلايا Excel باستخدام KUTOOLS AI Aide
توفّر ميزة «مساعد الذكاء الاصطناعي» من Kutools لـ Excel راحة لا مثيل لها في تنظيف أوراق Excel من خلال إزالة الأحرف غير الرقمية بسلاسة. بمجرد إدخال بسيط منك، تتولى هذه الأداة القوية المهمة، وتحلّل وتُنفّذ المهام المطلوبة تلقائيًا دون الحاجة إلى صيغ معقدة. وهذا لا يسرّع العملية فحسب، بل يلغي أيضًا احتمال حدوث أخطاء، مما يعزز إنتاجيتك ودقتك بشكل كبير. وتحوّل ميزة «مساعد الذكاء الاصطناعي» مهمة قد تكون شاقة يدويًا إلى عملية سلسة وفعّالة، مما يجعلها أداة أساسية لأي مستخدم Excel يسعى لتحسين سير عمله.
بعد تنزيل Kutools لـ Excel وتثبيته، انقر «KUTOOLS AI» > «مساعد الذكاء الاصطناعي» لفتح جزء «KUTOOLS AI Aide».
1. في جزء «KUTOOLS AI Aid»، أدخل طلبك كما في النص أدناه في مربع الدردشة، ثم انقر
زر «إرسال» أو اضغط مفتاح Enter لإرسال استفسارك.
"من فضلك، أزل الأحرف غير الرقمية من النطاق A2:A8 في Excel لي."
2. بمجرد أن تحلّل الأداة مدخلاتك، انقر زر «تنفيذ»، وسوف يستخدم KUTOOLS AI Aide تقنيته المبتكرة المدعومة بالذكاء الاصطناعي لمعالجة طلبك وتطبيق النتائج فورًا في Excel.

تلميح: لاستخدام هذه الميزة، يجب عليك تثبيت Kutools لـ Excel أولًا. يُرجىالنقر لتنزيل Kutools لـ Excelالآن.
إزالة الأحرف غير الرقمية من خلايا Excel باستخدام أداة رائعة
لتنظيف البيانات بكفاءة من خلال إزالة الأحرف غير الرقمية ضمن نطاق محدد، تقدم أداة «حذف الأحرف المحددة» من Kutools لـ Excel حلاً بنقرة واحدة. تبسّط هذه الأداة القوية عمليةً معقّدة عادةً، لتتيح لك التخلص فورًا من الأحرف غير المرغوب فيها وضمان بيانات أنظف وأكثر جاهزية للاستخدام على الفور.
1. بعد تحديد النطاق الذي تريد إزالة الأحرف غير الرقمية منه، انقر «Kutools» > «Text» > «حذف الأحرف المحددة».
2. في مربع حوار «حذف الأحرف المحددة»، اختر الخيار «Non-numeric»، ثم انقر «OK». وبذلك تُزال الأحرف غير الرقمية من التحديد فورًا.

تلميح: لاستخدام هذه الميزة، يجب عليك تثبيت Kutools لـ Excel أولًا. يُرجىالنقر لتنزيل Kutools لـ Excelالآن!
إزالة الأحرف غير الرقمية من خلايا Excel باستخدام كود VBA
لإزالة الأحرف غير الرقمية من نطاق باستخدام كود VBA، يُرجى اتباع الخطوات التالية:
الخطوة 1: فتح محرر وحدة VBA ونسخ الكود
- اضغط مع الاستمرار على مفتاحَي «ALT + F11» في Excel، وستفتح لك نافذة «مايكروسوفت فيجوال بيسك للتطبيقات».
- انقر على «إدراج» > «وحدة»، ثم انسخ والصق الكود التالي في نافذة الوحدة.
- كود VBA: إزالة جميع الأحرف غير الرقمية
Sub RemoveNotNum() 'Updateby Extendoffice Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) For Each Rng In WorkRng xOut = "" For i = 1 To Len(Rng.Value) xTemp = Mid(Rng.Value, i, 1) If xTemp Like "[0-9]" Then xStr = xTemp Else xStr = "" End If xOut = xOut & xStr Next i Rng.Value = xOut Next End Sub
الخطوة 2: تنفيذ الكود
- بعد لصق هذا الكود، اضغط على مفتاح F5 لتشغيله.
- في مربع الحوار المنبثق من Kutools for Excel، اختر النطاق الذي تريد إزالة الأحرف غير الرقمية منه، ثم انقر فوق «موافق».

النتيجة
ثم تتم إزالة جميع الأحرف غير الرقمية من النطاق المحدد.

Sub RemoveNotNum() 'Updateby Extendoffice Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) For Each Rng In WorkRng xOut = "" For i = 1 To Len(Rng.Value) xTemp = Mid(Rng.Value, i, 1) If xTemp Like "[0-9.]" Then xStr = xTemp Else xStr = "" End If xOut = xOut & xStr Next i Rng.Value = xOut Next End Sub- النتيجة

مقالات ذات صلة
كيف تزيل الأصفار البادئة والفراغات الخلفية في Excel؟
في هذه المقالة، سنستعرض طريقتين فعّالتين لإزالة الأصفار البادئة والفراغات الخلفية في Excel.
كيف تُزيل أول أو آخر X أحرف — أو أحرف من مواضع معيّنة — من النص في Excel؟
قد تحتاج، كأحد مستخدمي Excel، أحيانًا إلى حذف أول n أحرف من بداية سلاسل النصوص أو إزالة آخر x أحرف من نهايتها، كما هو موضح في لقطة الشاشة أدناه. وفي هذه المقالة، سنقدّم لك بعض الحيل المفيدة لأداء هذه المهمة بسرعة وسهولة في Excel.
العثور على موضع حرف في Excel – 3 طرق سريعة
على سبيل المثال، لنفترض أنك تريد العثور على التكرار الثاني أو الثالث للحرف "-" في سلسلة نصية. سأعرض لك تقنيات مباشرة تُنجز هذه المهمة بكفاءة.
عدّ الأحرف في Excel: الخلية والنطاق (دليل سهل)
في عالم Excel الواسع، يُعد فهم تفاصيل معالجة البيانات أمرًا بالغ الأهمية. ومن بين هذه الجوانب عدّ الأحرف أو الأحرف المحددة أو النصوص داخل خلية واحدة أو نطاق من الخلايا. ويقدّم لك هذا الدليل طرقًا سهلة خطوة بخطوة لتحقيق ذلك. سواءً كنت مبتدئًا أو خبيرًا في Excel، فهناك دائمًا شيء جديد لتتعلمه!
أفضل أدوات إنتاجية Office
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لزيادة الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
Office Tab يجلب واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبَين في Word وExcel وPowerPoint، بالإضافة إلى Publisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر مئات نقرات الفأرة يوميًا!
جميع إضافات Kutools في تثبيت واحد!
Kutools for Office تضم حزمة PowerPoint إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة— إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- تعمل بشكل أفضل معًا— إنتاجية مُبسّطة عبر تطبيقات Office
- نسخة تجريبية كاملة الميزات لمدة 30 يومًا— بدون تسجيل، ولا بطاقة ائتمان
- أفضل قيمة— وفّر مقارنةً بشراء الإضافات بشكل منفصل