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

تخيّل أن لديك قائمة بأسماء دول في ورقة العمل الخاصة بك، وتريد استخراج الحرف الأول من كل كلمة في تلك الأسماء. لا يوفّر إكسل ميزة مُباشرة لاستخراج الحروف الأولى من كل كلمة داخل خلية، لكنني سأعرض عليك بعض الطرق العملية التي تنفّذ هذه المهمة بكفاءة، لتكون العملية سلسة وفعّالة.
استخراج الحرف الأول من كل كلمة من خلية باستخدام صيغة
للحصول على الحرف الأول من كل كلمة في خلية، استخدم الصيغة التالية من نوع المصفوفة.
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، يُرجى النقر علىKUTOOLS AI>مساعد الذكاء الاصطناعيلفتح لوحةKUTOOLS AI Aide:
- اختر قائمة البيانات، ثم اكتب طلبك في مربع الدردشة، وانقر على زرإرسالأو اضغط على مفتاحEnterلإرسال السؤال؛
- بعد التحليل، انقر على زرتنفيذلتشغيل الطلب. سيقوم 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 كلمات من سلسلة نصية في إكسل.
- استخراج النص قبل/بعد المسافة أو الفاصلة فقط
- عندما تريد استخراج النص الذي يسبق أو يتبع المسافة من القائمة كما هو موضح أدناه، هل لديك طريقة جيدة لتحقيق ذلك؟ دعني أخبرك ببعض الطرق الذكية لـ استخراج النص قبل أو بعد المسافة فقط في إكسل.
- استخراج عناوين البريد الإلكتروني من سلسلة نصية
- عند استيراد بعض عنوان البريد الإلكتروني من موقع ويب إلى ورقة عمل إكسل، غالبًا ما يحتوي النص على محتوى غير ذي صلة، ولكنك الآن تريد فقط استخراج عنوان البريد الإلكتروني النقية من السلسلة النصية (انظر لقطات الشاشة التالية). كيف يمكنك الحصول بسرعة على عنوان البريد الإلكتروني من نص الخلية؟
- استخراج السلسلة بين حرفين مختلفين
- إذا كانت لديك قائمة من السلاسل في إكسل تحتاج فيها إلى استخراج جزء من السلسلة بين حرفين كما هو موضح في لقطة الشاشة أدناه، فكيف يمكنك تنفيذ ذلك بأسرع وقت ممكن؟ هنا، سأعرض بعض الطرق لحل هذه المهمة.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل