كيفية إضافة مسافة بين الاسم الأول والاسم الأخير في Excel؟
إليك قائمة بالأسماء التي تحتاج إلى إضافة مسافات لفصلها، كما هو موضح في لقطة الشاشة أدناه. كيف يمكنك حل هذه المشكلة بسرعة؟
إضافة مسافة بين الاسم الأول والاسم الأخير باستخدام دالة معرفة
إضافة مسافة بين الاسم الأول والاسم الأخير باستخدام Kutools لـ Excel
إضافة مسافة بين الاسم الأول والاسم الأخير باستخدام دالة معرفة
لإضافة مسافة بين الاسم الأول والاسم الأخير، يمكنك فقط استخدام دالة معرفة لحل هذه المسألة في Excel.
1. اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، والصق الكود أدناه في النص الفارغ.
الكود: إضافة مسافة بين الأسماء
Function AddSpaces(pValue As String) As String
'UpdatebyExtendoffice20160908
Dim xOut As String
xOut = VBA.Left(pValue, 1)
For i = 2 To VBA.Len(pValue)
xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
If xAsc >= 65 And xAsc <= 90 Then
xOut = xOut & " " & VBA.Mid(pValue, i, 1)
Else
xOut = xOut & VBA.Mid(pValue, i, 1)
End If
Next
AddSpaces = xOut
End Function
3. احفظ الكود وأغلق التطبيقات نافذة، حدد خلية فارغة وأدخل هذه الصيغة =AddSpaces(A1)، ثم اسحب مقبض التعبئة التلقائية عبر الخلايا التي تريد تطبيق هذه الصيغة عليها.
إضافة مسافة بين الاسم الأول والاسم الأخير باستخدام Kutools لـ Excel
إذا لم تكن معتادًا على الدوال المعرفة، يمكنك تطبيق أداة إضافة النص من Kutools لـ Excel لإضافة مسافة بسرعة بين الاسم الأول والاسم الأخير.
1. حدد الخلايا التي تريد إضافة مسافات إليها، انقر فوق Kutools > نص > إضافة نص. شاهد لقطة الشاشة:
2. في إضافة نص مربع الحوار، أدخل مسافة في مربع النص ، وحدد خيار متقدم واختر قبل الحروف الكبيرة من القائمة المنسدلة. شاهد لقطة الشاشة:
3. انقر فوق موافق أو تطبيق، الآن تم إضافة مسافة قبل كل حرف كبير. شاهد لقطة الشاشة:
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
عرض: إضافة مسافات بين الأسماء باستخدام Kutools لـ Excel
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد