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

كيف يمكن استخراج الحرف الأول من كل كلمة في خلية؟

المؤلفXiaoyangتاريخ التعديل
استخراج الحرف الأول من كل كلمة

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


استخراج الحرف الأول من كل كلمة من خلية باستخدام صيغة

للحصول على الحرف الأول من كل كلمة في خلية، استخدم الصيغة التالية من نوع المصفوفة.

1. يُرجى نسخ الصيغة التالية إلى خلية فارغة في المكان الذي ترغب فيه بالحصول على النتيجة، ثم اضغط معًا على مفاتيحCtrl + Shift + Enter للحصول على النتيجة الأولى.

=CONCAT(LEFT(FILTERXML("<a><b>"&SUBSTITUTE(A2," ","</b><b>")&"</b></a>","//b"),1))

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

استخراج الحرف الأول من كل كلمة باستخدام صيغة

شرح هذه الصيغة:
  • SUBSTITUTE(A2,« »,«»): تقوم هذه الدالة باستبدال كل مسافة في النص الموجود بالخلية A2 بسلسلة فارغة، مما يؤدي إلى دمج الكلمات معًا دون فواصل. على سبيل المثال، إذا احتوت الخلية A2 على «Hello World»، فإن هذا الجزء من الصيغة يحوّلها إلى «HelloWorld».
  • «»&...&« »: يُحيط هذا الجزء نتيجة دالة SUBSTITUTE بعلامتي اقتباس في البداية والنهاية. وباستمرار المثال، يصبح النص الآن «HelloWorld»، ليشكّل بنية XML صالحة حيث تكون كل كلمة محصورة داخل علامات.
  • FILTERXML(...,«//b»): تُستخدم دالة FILTERXML لتحليل سلسلة XML التي تم إنشاؤها في الخطوات السابقة، حيث يختار استعلام XPath //b جميع العناصر المحصورة داخل العلامات<b>—أي كل كلمة من السلسلة الأصلية. وفي مثالنا، تُعيد الدالة مصفوفة تحتوي على عنصرين: «Hello» و«World».
  • LEFT(...,1): بعد ذلك، تُطبَّق دالةLEFT على كل عنصر من عناصر المصفوفة التي أعادتها دالةFILTERXMLلاستخراج الحرف الأول من كل كلمة. وفي المثال، تكون النتيجة «H» و«W».
  • CONCAT(...): أخيرًا، تقوم دالة CONCAT بدمج جميع عناصر المصفوفة في سلسلة نصية واحدة. وفي مثالنا «Hello World»، ستدمج الحرفين «H» و«W» لتُنتج الناتج «HW».

استخراج الحرف الأول من كل كلمة من خلية باستخدام KUTOOLS AI Aide

استخرج بسرعة الحرف الأول من كل كلمة في الخلية باستخدامKUTOOLS AI Aide! لا حاجة لصيغ معقدة — فمساعد الذكاء الاصطناعي يُنفّذ المهمة تلقائيًا لك، مما يجعل معالجة البيانات أبسط وأكثر كفاءة. بسّط سير عملك في إكسل واجعل مهامك اليومية أسهل بكثير. جرّبKUTOOLS AI Aide وعايش تجربة إكسل الذكية!

Kutools لـ Excelيقدّم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة.مدمج مع إمكانات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة بلا جهد.معلومات تفصيلية عن Kutools لـ Excel...         نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel، يُرجى النقر علىKUTOOLS AI>مساعد الذكاء الاصطناعيلفتح لوحةKUTOOLS AI Aide:

  1. اختر قائمة البيانات، ثم اكتب طلبك في مربع الدردشة، وانقر على زرإرسالأو اضغط على مفتاحEnterلإرسال السؤال؛
  2. بعد التحليل، انقر على زرتنفيذلتشغيل الطلب. سيقوم KUTOOLS AI Aide بمعالجة طلبك باستخدام الذكاء الاصطناعي وإرجاع النتائج مباشرةً في إكسل.


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

يمكن تحسين مهمة استخراج الحرف الأول من كل كلمة من خلية بشكل كبير باستخدام دالة معرّفة من قبل المستخدم (UDF) في إكسل. يستعرض هذا القسم كيفية إنشاء واستخدام دالة UDF لتنفيذ هذه المهمة بكفاءة.

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

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

Function GetFirstLetters(rng As Range) As String
'Updateby Extendoffice
    Dim arr
    Dim I As Long
    arr = VBA.Split(rng, " ")
    If IsArray(arr) Then
        For I = LBound(arr) To UBound(arr)
            GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
        Next I
    Else
        GetFirstLetters = Left(arr, 1)
    End If
End Function

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

استخراج الحرف الأول من كل كلمة باستخدام دالة معرّفة من قبل المستخدم


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

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

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

🤖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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل