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

استخراج الكلمة n من السلسلة النصية في Excel

المؤلفXiaoyangتاريخ التعديل

إذا كانت لديك قائمة من السلاسل النصية أو الجُمل، وتريد استخراج الكلمة n المحددة منها كما هو موضح في لقطة الشاشة أدناه، فسأعرض لك في هذه المقالة بعض الطرق الفعّالة لأداء هذه المهمة في Excel.

doc-extract-nth-word-1


استخراج والحصول على الكلمة n من السلسلة النصية باستخدام صيغة

لإتمام هذه المهمة بسلاسة، يمكنك استخدام صيغة تجمع بين دوال TRIM وMID وSUBSTITUTE وREPT وLEN. الصيغة العامة هي:

=TRIM(MID(SUBSTITUTE(string,« »,REPT(« »,LEN(string))), (N-1)*LEN(string)+1, LEN(string)))
  • stringالسلسلة النصية أو قيمة الخلية التي ترغب في استخراج كلمة منها.
  • N: رقم الكلمة التي ترغب في استخراجها.

1. يُرجى إدخال الصيغة التالية أو نسخها في خلية فارغة:

=TRIM(MID(SUBSTITUTE(A2,« »,REPT(« »,LEN(A2))), (B2-1)*LEN(A2)+1, LEN(A2)))

ملاحظة: في الصيغة أعلاه،A2 هي الخلية التي تحتوي على السلسلة النصية التي تريد استخدامها، وB2 هو رقم الكلمة التي تريد استخراجها، ويمكنك أيضًا إدخاله مباشرةً كرقم.

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

doc-extract-nth-word-2


شرح الصيغة:
  • 1. SUBSTITUTE(A2,« »,REPT(« »,LEN(A2))):
  • REPT(« »,LEN(A2): تُستخدم دالة REPT هنا لتكرار حرف المسافة عددًا محددًا من المرات يساوي طول النص للخلية A2، مما يعطي عددًا من أحرف المسافة؛
  • SUBSTITUTE(A2,« »,REPT(« »,LEN(A2))): تقوم دالة SUBSTITUTE باستبدال كل مسافة في الخلية A2 بعدد كبير من أحرف المسافة التي تُولِّدها دالة REPT، مما ينتج سلسلة نصية تحتوي على مسافات متعددة بين كل كلمة.
  • يُستخدم هذا الجزء كمعطى نصي في دالة MID.
  • 2. (B2-1)*LEN(A2)+1: تُرجع هذه الصيغة موضع البداية للكلمة رقم n في السلسلة النصية الموجودة في الخلية A2، وهو يمثّل المعطى start_num في دالة MID.
  • 3. MID(SUBSTITUTE(A2,« »,REPT(« »,LEN(A2))), (B2-1)*LEN(A2)+1, LEN(A2)):تستخرج دالة MID الكلمة رقم n من السلسلة النصية في الخلية A2 بناءً على النتائج التي تُرجعها الصيغ السابقة.
  • 4. TRIM():تقوم دالة TRIM() بإزالة أحرف المسافة الزائدة بين الكلمات.

نصائح: إذا وُجدت مسافات متعددة بين الكلمات، فلن تعمل الصيغة أعلاه بشكل صحيح. في هذه الحالة، يتعيّن عليك تضمين دالة TRIM داخل دالة SUBSTITUTE. يُرجى استخدام الصيغة التالية:

=TRIM(MID(SUBSTITUTE(TRIM(A2),« »,REPT(« »,LEN(A2))), (B2-1)*LEN(A2)+1, LEN(A2)))

doc-extract-nth-word-3


استخراج والحصول على الكلمة n من السلسلة النصية باستخدام دالة معرّفة من قبل المستخدم

إذا بدت لك الصيغة أعلاه معقّدة أو يصعب فهمها، فسأقدّم لك هنا دالة مُعرَّفة من قِبل المستخدم تُسهّل عليك المهمة. باستخدام الكود أدناه، يمكنك بسهولة استخراج الكلمة ذات الترتيب *n* من أي سلسلة نصية. يُرجى اتباع الخطوات التالية:

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

2. انقر علىInsert > Module، ثم انسخ والصق الكود التالي في نافذة الـ Module.

Function FindWord(Source As String, Position As Integer)
'Update by Extendoffice
Dim arr() As String
arr = VBA.Split(Source, " ")
xCount = UBound(arr)
If xCount < 1 Or (Position - 1) > xCount Or Position < 0 Then
    FindWord = ""
Else
    FindWord = arr(Position - 1)
End If
End Function

3. بعد ذلك، احفظ وأغلق وحدة الكود، ثم أدخل هذه الصيغة: =findword(A2,B2) في خلية فارغة حيث تريد عرض النتيجة:

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

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

doc-extract-nth-word-4


استخراج والحصول على الكلمة n من السلسلة النصية باستخدام ميزة قوية

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


الدوال ذات الصلة المستخدمة:

  • REPT:
  • تُستخدم دالة REPT لتكرار أحرف معيّنة عددًا محدّدًا من المرات.
  • SUBSTITUTE:
  • تستبدل دالة SUBSTITUTE نصًّا أو أحرفًا داخل سلسلة نصية بنصٍّ أو أحرفَ أخرى.
  • TRIM:
  • تقوم دالة TRIM بإزالة جميع المسافات الزائدة من النص، وتحتفظ بمسافة واحدة فقط بين الكلمات.
  • MID:
  • تُرجع دالة MID أحرفًا محددة من وسط السلسلة النصية.
  • LEN:
  • تُرجع دالة LEN عدد الأحرف الموجودة في السلسلة النصية.

مقالات إضافية:


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

Kutools لـ Excel - يساعدك على التميز بين الحشود

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

Kutools لـ Excel يضم أكثر من 300 ميزة،مما يضمن أن ما تحتاجه يكون على بعد نقرة واحدة فقط...


Office Tab - تمكين القراءة والتحرير بعلامات التبويب في Microsoft Office (بما في ذلك Excel)

  • ثانية واحدة للتبديل بين عشرات المستندات المفتوحة!
  • يوفر لك مئات النقرات يوميًا، وقل وداعًا لألم يد الفأرة!
  • يزيد من إنتاجيتك بنسبة 50% عند عرض وتحرير مستندات متعددة.
  • يجلب كفاءة علامات التبويب إلى Office (بما في ذلك Excel)، تمامًا كما في Chrome وEdge وFirefox.