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

كيف تضيف مسافة بين الاسم الأول والاسم الأخير في Excel؟

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

عند التعامل مع جداول تحتوي على قائمة الأسماء، من الشائع أن تجد الاسم الأول والاسم الأخير مدمجين دون مسافة بينهما—مثل «JohnSmith» بدلًا من «John Smith». وغالبًا ما ينتج هذا عن استيراد البيانات من أنظمة أخرى، أو دمج النصوص (concatenation)، أو تنسيق غير سليم. ولا يؤثر هذا التنسيق سلبًا على قابلية القراءة فحسب، بل قد يؤدي أيضًا إلى مشكلات في الفرز والتصفية وتحليل النصوص لاحقًا. ولذلك، إذا كنت بحاجة إلى فصل الاسم الأول عن الاسم الأخير بوضوح في Excel، فإن إدخال مسافة بينهما يصبح خطوة ضرورية ومفيدة للغاية لضمان وضوح التقارير، ودقة عمليات دمج المراسلات، وكفاءة معالجة البيانات بشكل عام.

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

لقطة شاشة تُظهر قائمة الأسماء الأولية مع إضافة مسافات في Excel

أضف مسافة بين الاسم الأول والاسم الأخير باستخدام دالة معرّفة

أضف مسافة بين الاسم الأول والاسم الأخير باستخدام Kutools لـ Excel فكرة جيدة3

أضف مسافة بين الاسم الأول والاسم الأخير باستخدام صيغة (Excel 2021 والإصدارات الأحدث / Excel 365)


أضف مسافة بين الاسم الأول والاسم الأخير باستخدام دالة معرّفة

إذا كنت بحاجة إلى إضافة مسافة بين الاسم الأول والاسم الأخير المنسَّقَين كسلسلة نصية واحدة، يمكنك تحقيق ذلك باستخدامدالة معرّفة(تُعرف أيضًا باسم دالة معرّفة من قبل المستخدم أو UDF) في Excel. يُعد هذا الحل مثاليًا عندما يكون لديك عدد كبير من الأسماء، ويصبح التعامل معها يدويًّا أمرًا مرهقًا جدًّا من حيث الوقت. تعمل الدالة المعرّفة على إدخال مسافة قبل كل حرف كبير يلي الحرف الأول، مما يجعلها خيارًا ممتازًا إذا كانت أسماؤك تستخدم باستمرار الأحرف الكبيرة لفصل المكونات (مثل «JohnSmith» أو «MaryJones» وما شابه). وتُAutomation هذه الطريقة العملية، فتقلل التدخل اليدوي وتحصر احتمالات الخطأ.

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

فيما يلي كيفية إنشاء واستخدام هذه الدالة المعرّفة:

1. اضغطAlt + F11 على لوحة المفاتيح لفتح نافذةMicrosoft Visual Basic for Applications(VBA). إذا لم تكن قد استخدمت VBA من قبل، فقد تحتاج إلى تمكين علامة التبويب «المطور» في شريط أدوات Excel للوصول إليها بسهولة أكبر.

2. في نافذة VBA، انقر فوقإدراج > وحدة نمطية (Module)، مما يفتح منطقة برمجة فارغة. بعد ذلك، انسخ والصق رمز VBA التالي في منطقة النص البرمجي للوحدة النمطية.

الرمز: إضافة مسافة بين الأسماء

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

لقطة شاشة تُظهر الوحدة النمطية التي تم إنشاؤها مع لصق كود VBA

3. بعد لصق الرمز، اضغطCtrl + Sلحفظ الملف (إذا طُلب منك ذلك، احفظ الملف كمصنف يدعم ماكرو بامتداد).xlsm). ثم أغلق نافذة VBA للعودة إلى ورقة عمل Excel الخاصة بك.

حدّد خلية فارغة ترغب في أن يظهر فيها الاسم المصحَّح. على سبيل المثال، إذا كان اسمك موجودًا في الخلية A1، فأدخل الصيغة التالية:

=AddSpaces(A1)

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

لقطة شاشة توضيحية لدالة AddSpaces في Excel مع النتائج

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

إذا ظهر خطأ #NAME؟، فتأكد من أن إعدادات أمان الماكرو تسمح بتشغيله، وأن المصنف محفوظ كمصنف يدعم الماكرو من نوع الملف المناسب.


أضف مسافة بين الاسم الأول والاسم الأخير باستخدام Kutools لـ Excel

إذا لم يكن كتابة أو تعديل رمز VBA مناسبًا لك، فيمكن لمستخدمي Excel استخدام أداةKutools لـ Excel’s إضافة نصبسهولة. تتيح لك هذه الأداة البديهية إدخال مسافة قبل كل حرف كبير ضمن الخلايا المحددة، مما يجعلها الحل المثالي عندما تحتاج إلى معالجة سريعة وغير برمجية لبياناتك الواسعة. وتُعدّ Kutools لـ Excel خيارًا مثاليًا للمستخدمين الذين يتعاملون غالبًا مع مجموعات بيانات كبيرة ويرغبون في تنفيذ عمليات نصية فعّالة ومتكررة دون الحاجة إلى تعلّم البرمجة. وبالمقارنة مع التحرير اليدوي، لا توفّر Kutools الوقت فحسب، بل تقلّل أيضًا من خطر الوقوع في الأخطاء عند التعامل مع قوائم طويلة.

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

لاستخدام هذه الميزة، اتبع الخطوات التالية:

1. حدد جميع الخلايا التي تحتوي على أسماء تحتاج إلى فصلها. ثم في شريط Excel، انقر فوقKutools > نص > إضافة نص.

لقطة شاشة لخيار Kutools إضافة نص في شريط أدوات Excel

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

لقطة شاشة تُظهر مربع حوار Kutools إضافة نص مع خيارات لإدخال المسافات

3. بعد ضبط الإعدادات، انقر فوقموافقأوتطبيق. ستقوم Kutools فورًا بمعالجة الخلايا المحددة، وسترى أن مسافةً قد أُدخلت تلقائيًّا قبل كل حرف كبير في كل اسم:

لقطة شاشة تعرض قائمة الأسماء مع إدراج المسافات باستخدام خاصية Kutools إضافة نص

تلميح:إذا لاحظت وجود مسافة زائدة في بداية أي خلية (على سبيل المثال، إذا بدأ الاسم بحرف كبير وأدخلت Kutools مسافة في البداية)، فيمكنك إزالتها بسرعة باستخدام أداةحذف الفراغاتالموجودة ضمنKutools لـ Excel. تتيح لك هذه الوظيفة الإضافية إزالة المسافات البادئة أو اللاحقة أو الزائدة — أو حتى جميع المسافات — حسب احتياجاتك، مما يساعدك على تنظيف بياناتك بكفاءة أكبر.

لقطة شاشة تُظهر أداة Kutools لإزالة المسافات مع خيارات إزالة المسافات في Excel

مزايا استخدام Kutools:لا تتطلب هذه الطريقة أي مهارات برمجية، وتعالج دفعات كبيرة من الأسماء بنقرات قليلة. ومع ذلك، لاحظ أن الأداة ستضيف مسافات قبل كل حرف كبير؛ لذا إذا كانت أسماؤك تحتوي على أحرف أولى مختصرة أو أحرف كبيرة متتالية، فقد تحتاج إلى إجراء تعديلات يدوية لاحقة.

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

أضف مسافة بين الاسم الأول والاسم الأخير باستخدام صيغة (Excel 2021 والإصدارات الأحدث / Excel 365)

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

1. في خلية فارغة مجاورة لبياناتك (مثلًا، الخلية B1 إذا كان اسمك في A1)، أدخل الصيغة التالية:

=TEXTJOIN("",,IF(ISNUMBER(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),IF(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))<=90," "&MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))))

تبحث هذه الصيغة عن موضع أول حرف كبير (من A إلى Z) بعد الحرف الأول، ثم تقسم الاسم عند تلك النقطة وتدمج الجزأين مع إدخال مسافة بينهما.

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

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


عرض توضيحي: إضافة مسافات بين الأسماء باستخدام Kutools لـ Excel

 
Kutools لـ Excel: أكثر من 300 أداة مفيدة بين يديك! استمتع بميزات مدعومة بالذكاء الاصطناعي لإنجاز عملك بذكاء وسرعة أكبر!حمّل الآن!

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

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