Skip to main content

Kutools for Office — مجموعة واحدة. خمسة أدوات. أنجز المزيد.

كيفية تبديل أو تحويل النص داخل خلية واحدة في Excel؟

Author Siluvia Last modified

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

تبديل أو تحويل النص داخل خلية واحدة باستخدام الصيغة
تبديل أو تحويل النص داخل خلية واحدة باستخدام كود VBA
تبديل أو تحويل النص داخل خلية واحدة بسهولة باستخدام Kutools لـ Excel>

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

الصيغة أدناه يمكن أن تساعدك في تبديل النصوص داخل خلية واحدة في Excel. الرجاء القيام بما يلي.

1. حدد خلية فارغة لوضع البيانات المتبادلة، وأدخل الصيغة في شريط الصيغة (F)، ثم اضغط على مفتاح الإدخال Enter. انظر إلى لقطة الشاشة:

=RIGHT(A2,LEN(A2)-FIND(" ",A2)) & " " & LEFT(A2,FIND(" ",A2)-1)

switch text around with a formula

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

drag and fill the formula to other cells

ثم يمكنك رؤية أن الاسم الأول والاسم الأخير قد تم تبديلهما في الخلايا المحددة.

ملاحظة: هذه الطريقة يمكنها فقط تبديل نصين داخل خلية واحدة يتم فصلهما بمسافة.

تبديل أو تحويل النص داخل خلية واحدة بسهولة في Excel:

الأداة عكس النص من Kutools لـ Excel يمكن أن تساعدك بسهولة على تبديل النص داخل خلية واحدة بواسطة فاصل معين في Excel كما هو موضح في العرض التوضيحي أدناه.
قم بتنزيله وتجربته الآن! (30-day free trail)

switch text around by kutools

تبديل أو تحويل النص داخل خلية واحدة باستخدام كود VBA

كما هو موضح في المثال أعلاه، يمكنك أيضًا تشغيل البرنامج النصي VBA التالي لتبديل أو تحويل النص داخل خلية واحدة.

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

2. في نافذة Microsoft Visual Basic for Applications، انقر فوق إدراج > وحدة. ثم قم بنسخ ولصق الكود VBA أدناه في نافذة الوحدة.

كود VBA: تبديل أو تحويل النص داخل خلية واحدة

Sub res()
    Dim xRg As Range, yRg As Range
    Dim LastRow As Long, i As Long
    Dim strTxt As String, strFs As String
    Dim strLs As String, N As Integer
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Range Selection:", _
                                    Title:="Kutools for excel", Type:=8)
    For Each yRg In xRg
        On Error Resume Next
        strTxt = yRg.Value
        Trim (strTxt)
        N = InStr(strTxt, " ")
        strLs = Left(strTxt, N - 1)
        strFs = Right(strTxt, Len(strTxt) - N)
        yRg.Value = strFs & " " & strLs
    Next
End Sub

3. اضغط على مفتاح F5 لتشغيل الكود. في مربع الحوار المنبثق Kutools لـ Excel، يرجى تحديد النطاق الذي يحتوي على البيانات التي تحتاج إلى تبديلها، ثم انقر فوق الزر موافق. انظر إلى لقطة الشاشة:

vba code to select the data list

ثم يمكنك رؤية النصوص في الخلايا ذات الأسماء المحددة يتم تبديلها على الفور.

ملاحظة: يمكن لهذا الكود أيضًا تبديل كلمتين داخل خلية واحدة يتم فصلهما بمسافة بشكل صحيح.

تبديل أو تحويل النص داخل خلية واحدة بسهولة باستخدام Kutools لـ Excel

يوصي هذا القسم بأداة عكس ترتيب النص من Kutools لـ Excel لمساعدتك في حل هذه المشكلة بسهولة. الرجاء القيام بما يلي.

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

1. حدد النطاق الذي يحتوي على النصوص التي تحتاج إلى تبديلها، ثم انقر فوق Kutools > نص > عكس ترتيب النص. انظر إلى لقطة الشاشة:

click Reverse Text Order feature of kutools

2. في مربع الحوار عكس النص، حدد الفاصل الذي ستعتمد عليه لتبديل النصوص في قسم الفاصل. في هذه الحالة، اخترت خيار المسافة. وبعد ذلك انقر فوق الزر موافق.

select the Space option in the dialog box

ثم يمكنك رؤية البيانات في الخلايا المحددة يتم تبديلها في نفس الخلية بواسطة الفاصل المحدد على الفور.

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

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

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

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات اعتمادًا على: التنفيذ الذكي |  توليد الأكواد |  إنشاء الصيغ المخصصة |  تحليل البيانات وتوليد الرسوم البيانية |  استخدام Kutools Functions...
ميزات شائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو الخلايا بدون فقدان البيانات | تقريب بدون الصيغة...
بحث متقدم: بحث بمعايير متعددة VLookup | بحث بقيم متعددة VLookup | بحث في عدة ورقات VLookup | مطابقة غامضة...
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة معتمدة | قائمة منسدلة متعددة الاختيارات...
مدير الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاقات والأعمدة...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | مدير أدوات المصنف وورقة العمل | مكتبة النص التلقائي | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب الجدول | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...)...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع رسم بياني (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |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.

Excel Word Outlook Tabs PowerPoint
  • حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
  • مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
  • الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
  • تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
  • قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد