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

كيف تقسم خلية عند أول رقم في Excel؟

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

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

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

تقسيم خلية عند أول رقم باستخدام الصيغ

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

نظرة عامة

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

1) حدد خلية لوضع الجزء النصي من نتيجة التقسيم (مثلB1). ثم أدخل الصيغة التالية لاستخراج النص الذي يسبق أول رقم في الخليةA1:

=TRIM(LEFT(A1, MIN(FIND({0,1,2,3,4,5,6,7,8,9}, A1 & "0123456789")) - 1))

اضغطEnter للتأكيد، ثم اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على الصفوف الأخرى واستخراج جزء النص من كل سلسلة كما هو موضح أدناه.
إدخال صيغة لتقسيم الخلية عند أول رقم

2) لاستخراج الباقي بدءًا من أول رقم، حدد خلية مجاورة (مثلC1) وأدخل:

=TRIM(REPLACE(A1, 1, LEN(B1), ""))

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

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

  • LEFT(A1, …): يُعيد النص الموجود على اليسار حتى أول رقم (بدون تضمينه).
  • MIN(FIND({0-9}, A1 & "0123456789")): يبحث عن أول رقم في الخلية ويعيد موضعه؛ ويضمن إلحاق"0123456789"إيجاد تطابق حتى لو لم يحتوِ النص في A1 على أي أرقام.
  • TRIM(…): يزيل المسافات الزائدة من حول الأجزاء المستخرجة.
  • REPLACE(A1, 1, LEN(B1), ""): يُزيل النص الموجود على اليسار (بطول يساوي محتوى الخلية B1) ويعيد باقي النص بدءًا من أول رقم.
  • VALUE(…): تحويل السلسلة الرقمية المستخرَجة إلى قيمة رقمية عند الحاجة لاستخدامها في الحسابات.

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

  • لا توجد أرقام:الصيغة الأولى تُعيد النص بأكمله، بينما تُعيد الصيغة الثانية خلية فارغة. لفّها باستخدامIF/IFERROR للحصول على مخرجات مخصصة.
  • الاعتماديات:تعتمد الصيغة الثانية على النص المستخرج فيB1. حدّث المراجع إذا كان تخطيط جدولك مختلفًا.
  • الأرقام غير القياسية:إذا احتوت بياناتك على أرقام كاملة العرض (full-width) أو أرقام غير ASCII، فقم بتوحيدها أولًا أو وسّع مجموعة الأرقام في دالةFIND.
  • الأداء:بالنسبة للنطاقات الكبيرة جدًّا، فكّر في استخدام صيغة الملء لأسفل مرة واحدة، ثم انقرلصق خاص ▸ القيملتجميد النتائج.
  • نظافة البيانات:أزِل المسافات البادئة أو الفراغات الزائدة من المصدر باستخدامTRIM أوCLEAN إذا ظهرت نتائج غير متوقعة.

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

في Excel، يُعد تقسيم خلية إلى أعمدة عملية شاقة عند استخدام المعالج خطوة بخطوة. ولكن مع الأداة، يمكنك: 1. تحويل خلية واحدة إلى أعمدة أو صفوف بناءً على محدد؛ 2. تحويل النص إلى أعمدة حسب النص والرقم؛ 3. تقسيم النص بناءً على عرض معيّن — وكل ذلك بنقرات قليلة فقط!انقر لتجربة مجانية كاملة الميزات لمدة 30 يومًا!Kutools لـ Excel's تقسيم الخلايا
مستند تقسيم خلية
 
Kutools لـ Excel: يحتوي على أكثر من 300 إضافة مفيدة لـ Excel، جرّبها مجانًا دون أي قيود لمدة 30 يومًا.

تقسيم خلية عند أول رقم باستخدام Word وأداة «نص إلى أعمدة»

في بعض الحالات، قد تحتوي بياناتك على سلاسل أطول أو أكثر تنوعًا، أو قد تبحث عن حلٍّ لا يعتمد على الصيغ—خاصةً إذا كنت تنوي إجراء معالجة لمرة واحدة أو دُفعية لإعداد تقرير. أحد الحلول البديلة المفيدة هو الجمع بين أداةالبحث والاستبدالفي Microsoft Word مع أداةنص إلى أعمدةفي Excel. تعتمد هذه الطريقة على قدرات البحث والاستبدال المتقدمة في Word (التي تشبه التعبيرات النظامية) لإدخال فاصل بسرعة عند نقطة التقسيم.

نظرة عامة

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

إذا كانت سلاسلك تتكون من أرقام متبوعة بنص (أو العكس)، فإليك كيفية المتابعة:
بيانات عينة

1. انسخ سلاسلك المستهدفة في Excel والصقها في مستند Word فارغ. بعد ذلك، اضغطCtrl + H لفتح مربع حوارالبحث والاستبدال.
نسخ السلاسل ولصقها في Word، ثم فتح البحث والاستبدال

2. في مربع حوار البحث والاستبدال، أدخل([0-9]{1,}) في خانةالبحث عن، ثم اكتب\1, في خانةاستبدال بـ. انقرالمزيدلتوسيع الخيارات، وفعّل خياراستخدام أحرف البدل.
تحديد خيارات البدل في ميزة البحث والاستبدال في Word

ملاحظات المعاملات:
- ([0-9]{1,}) يعثر على أي مجموعة مكونة من رقم واحد أو أكثر (صيغة أحرف البدل في Word).
- \1, يضع فاصلةبعدكل مجموعة أرقام مطابقة، لتكون بمثابة محدِّد جديد.

3. انقراستبدال الكل. وأجب بـنعموموافقإذا ظهرت مربعات تأكيد.

النقر على نعمسهم يمينالنقر على موافق

سيؤدي هذا إلى إضافة فاصلة بعد كل رقم، مما يهيئ البيانات للتقسيم بسهولة في Excel.
تمت إضافة فاصلة بعد كل سلسلة أرقام

4. انسخ النص المعدّل من Word والصقه مجددًا في ورقة عمل Excel الخاصة بك، ثم انتقل إلىبيانات > نص إلى أعمدة.
النقر على بيانات > نص إلى أعمدة

5. في معالجنص إلى أعمدة، اخترمحدد بفواصل، ثم انقرالتالي، واخترفاصلةكمحددك.

تحديد محددسهم يمينتحديد فاصلة

6. انقرالتالي، واختر مكان وضع نتائج التقسيم، ثم انقرإنهاء.
اختيار خلية لإخراج النتيجة

ستظهر بياناتك الآن في أعمدة منفصلة—مقسَّمة عند أول رقم (بافتراض أن كل صف يحتوي على مجموعة رقمية واحدة فقط).
تم تقسيم السلاسل عند أول رقم

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

  • هل تريد الرقم الأول فقط؟يستخدم النموذج البسيط للبدائل ()([0-9]{1,}) → \1, إضافة فاصلة بعدكلمجموعة أرقام. استخدم هذه الطريقة فقط عندما يحتوي كل نص على مجموعة رقمية واحدة. وإلا، ففكّر في استخدامطريقة الصيغةأوPower Query للفصل عند أول رقم فقط.
  • إضافة فاصلة قبل الرقم:إذا كان الجزء الأول نصًّا وكنت ترغب في وضع الفاصلةقبلالأرقام، استخدم,\1 في حقلاستبدال بـ. (تم تحديث صورة المثال لتوضيح أن “الجزء الأول نص”.)
  • الأحرف واللغات المحلية:إذا احتوت الأرقام على أشكال غير ASCII أو أحرف كاملة العرض، فقد لا تتمكن بدائل Word من التعرّف عليها. قم بتوحيد هذه الأحرف أولًا أو معالجتها في Excel/Power Query.
  • أمان البيانات:احرص على إنشاء نسخة احتياطية قبل الاستبدال. وبعد إعادة الاستيراد إلى Excel، استخدمنص إلى أعمدةبحذر لتجنب الكتابة فوق البيانات المجاورة.
  • النتائج الثابتة:هذه الطريقة ليست ديناميكية؛ فإذا كانت بياناتك الأصلية تتغيّر كثيرًا، فاختر طريقة الصيغة لتحديث النتائج تلقائيًّا.

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

تقسيم خلية عند أول رقم باستخدام كود VBA

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

نظرة عامة

  • الفوائد:قابلة للتخصيص بشكل كبير، وقابلة للتوسّع لمعالجة الدُفعات، وتقلّل الخطوات اليدوية.
  • القيود:تتطلب أذونات ماكرو ومعرفة أساسية بـ VBA، ولا تكون النتائج ديناميكية فورًا كما هو الحال مع الصيغ.

1. افتح Excel، ثم اضغطAlt + F11 لفتح محرر VBA. في واجهة VBA، انقرإدراج > وحدة نمطيةلإنشاء وحدة جديدة، ثم انسخ والصق الكود التالي في الوحدة:

Option Explicit

Sub SplitAtFirstNumber()
    Dim selRng As Range, c As Range
    Dim sText As String
    Dim i As Long, firstPos As Long
    Dim title As String
    
    title = "KutoolsforExcel"
    
    ' Let user choose the range (safe-cancel)
    On Error Resume Next
    Set selRng = Application.InputBox( _
        Prompt:="Select range to split", _
        Title:=title, _
        Default:=Selection.Address, _
        Type:=8)
    On Error GoTo 0
    
    If selRng Is Nothing Then
        MsgBox "Operation cancelled.", vbInformation
        Exit Sub
    End If
    
    Application.ScreenUpdating = False
    
    For Each c In selRng.Cells
        If Not IsError(c.Value) And Len(c.Value) > 0 Then
            sText = CStr(c.Value)
            firstPos = 0
            
            ' Find the position of the first ASCII digit 0-9
            For i = 1 To Len(sText)
                If Mid$(sText, i, 1) Like "[0-9]" Then
                    firstPos = i
                    Exit For
                End If
            Next i
            
            If firstPos > 0 Then
                c.Offset(0, 1).Value = Left$(sText, firstPos - 1) ' text before the first number
                c.Offset(0, 2).Value = Mid$(sText, firstPos)      ' remainder from the first number
            Else
                c.Offset(0, 1).Value = sText
                c.Offset(0, 2).Value = ""
            End If
        Else
            ' Blank or error cells: copy to text part, keep number part blank
            c.Offset(0, 1).Value = c.Value
            c.Offset(0, 2).Value = ""
        End If
    Next c
    
    Application.ScreenUpdating = True
    MsgBox "Split completed.", vbInformation
End Sub

2. لتشغيل الماكرو، اضغطF5 في نافذة VBA، أو في Excel اضغطAlt + F8، واخترSplitAtFirstNumber، ثم انقرتشغيل. بعد ذلك، سيعرض لك مربع حوار بعنوان “KutoolsforExcel” يطلب منك تحديد نطاق الخلايا التي تريد معالجتها؛ فقط اختر خلاياك وقم بالتأكيد. سيقوم الماكرو بتقسيم كل خلية محددة بحيث يضع الجزء النصي الذي يسبق أول رقم في العمود الموجود مباشرةً على اليمين، بينما يوضع الباقي (الأرقام وما يليها من أحرف) في العمود التالي. وإذا لم يُعثر على أي رقم في الخلية، فسيتم نقل جميع البيانات إلى عمود النص، ويُترك عمود الأرقام فارغًا.زر التشغيل

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

  • لا تُستبدل البيانات الأصلية:تُكتب النتائج في العمودين التاليين ()Offset(0,1) وOffset(0,2)). انقل أو احفظ نسخة احتياطية من البيانات في هذين العمودين مسبقًا إذا لزم الأمر، أو غيّر الإزاحات في الكود.
  • مجموعة الأحرف:يطابق النموذج أرقام ASCII [0-9]. للأرقام الكاملة العرض أو غير ASCII، وسّع نطاق التحقق أو وحّد المدخلات أولًا.
  • الأداء:بالنسبة للنطاقات الكبيرة جدًّا، تكون هذه الحلقة عادةً سريعة. وإذا لزم الأمر، يمكنك قراءة النطاق إلى مصفوفة ثم كتابته دفعة واحدة لزيادة السرعة أكثر.
  • تمكين الماكرو:تأكد من تمكين الماكرو، وإلا فلن يعمل الكود.
  • التراجع:لا يمكن التراجع عن إجراءات VBA خطوة بخطوة. لذا، فكّر في حفظ نسخة احتياطية قبل التشغيل.
لقطة شاشة لـ kutools for excel ai

افتح سحر إكسل مع KUTOOLS AI

  • التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
  • الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
  • برمجة VBA: اكتب وأَنفِذ أكواد 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل