كيفية عكس سلسلة النص أو ترتيب الكلمات في إكسيل؟

عند استخدام ورقة عمل Excel ، كيف يمكنك عكس سلسلة النص أو ترتيب الكلمات في Excel؟ على سبيل المثال ، تريد عكس "يعد Excel أداة مفيدة لنا"إلى"su rof نهب lufesu a si lecxE". أو يمكنك أحيانًا عكس ترتيب الكلمات مثل "Excel ، Word ، PowerPoint ، OneNote"إلى"OneNote و PowerPoint و Word و Excel". عادة يكون حل هذه المشكلة صعبًا نوعًا ما. يرجى الاطلاع على الطرق التالية:

سلسلة نصية عكسية مع وظيفة محددة من قبل المستخدم

ترتيب الكلمات العكسي مفصولة بفاصل محدد مع كود VBA

سلسلة نصية عكسية أو ترتيب كلمات مع Kutools for Excel بسرعة وسهولة

سلسلة نصية عكسية مع وظيفة محددة من قبل المستخدم

لنفترض أن لديك مجموعة من السلاسل النصية التي تريد عكسها ، مثل "أضف الأصفار البادئة في Excel"إلى"lecxE ni sorez gnidael dda". يمكنك عكس النص بالخطوات التالية:

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

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

Function Reversestr(str As String) As String
    Reversestr = StrReverse(Trim(str))
End Function

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

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

ترتيب الكلمات العكسي مفصولة بفاصل محدد مع كود VBA

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

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

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

Sub ReverseWord()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Sigh As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Sigh = Application.InputBox("Symbol interval", xTitleId, ",", Type:=2)
For Each Rng In WorkRng
    strList = VBA.Split(Rng.Value, Sigh)
    xOut = ""
    For i = UBound(strList) To 0 Step -1
        xOut = xOut & strList(i) & Sigh
    Next
    Rng.Value = xOut
Next
End Sub

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

4. ثم اضغط Ok، يظهر مربع حوار آخر لك لتحديد الفاصل الذي تريد عكس الكلمات بناءً عليه ، انظر لقطة الشاشة:

5. ثم اضغط OK، ويمكنك رؤية الكلمات المحددة معكوسة ، انظر لقطات الشاشة:

سلسلة نصية عكسية أو ترتيب كلمات مع Kutools for Excel بسرعة وسهولة

• Kutools for Excelالصورة عكس ترتيب النص يمكن أن تساعدك على عكس السلاسل النصية المختلفة بسرعة وسهولة. يمكنه القيام بالعمليات التالية:

اعكس النص من اليمين إلى اليسار ، مثل "اضغط على بعض الكلمات"إلى"sdrow ايموس بات"؛

يتم فصل النص العكسي بمسافة أو بأحرف محددة أخرى ، مثل "تفاح برتقال عنب"إلى"عنب برتقال تفاح"؛

عكس النص من اليمين إلى اليسار:

1. حدد النطاق الذي تريد عكسه.

2. انقر كوتولس > أدوات النص > عكس ترتيب النص، انظر لقطة الشاشة:

3. في عكس النص مربع الحوار ، حدد الخيار المناسب من الفاصل التي تتوافق مع قيم الخلية. ويمكنك معاينة النتائج من ملف جزء المعاينة. انظر لقطة الشاشة:

 تنزيل وتجربة مجانية Kutools for Excel الآن !

عكس النص مفصول بمسافة أو بأحرف محددة أخرى:

يمكن أن تساعدك هذه الميزة أيضًا في عكس السلاسل النصية المفصولة بأحرف معينة.

1. حدد الخلايا وقم بتطبيق هذه الأداة عن طريق النقر كوتولس > نص > عكس ترتيب النص.

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

3. ثم اضغط Ok or التقديم، تم عكس الكلمات الموجودة في الخلايا مرة واحدة. انظر لقطات الشاشة:

ملاحظة:تدقيق تخطي النصوص غير النصية خلايا لمنعك من عكس الأرقام في النطاق المحدد.

لمعرفة المزيد عن هذه الوظيفة ، يرجى زيارة عكس ترتيب النص.

تنزيل وتجربة مجانية Kutools for Excel الآن !

عرض توضيحي: سلسلة نصية عكسية تستند إلى فاصل محدد باستخدام Kutools for Excel

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

كيفية قلب الاسم الأول والأخير في الخلايا في إكسيل؟

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

	الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة
	سوبر بحث: معايير متعددة VLookup  |   VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
	قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
	مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة
	الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير   |  مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا   |  إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
	أفضل 15 مجموعة أدوات:  12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

ارفع مهاراتك في برنامج Excel باستخدام Kutools for Excelوتجربة كفاءة لم يسبق لها مثيل. Kutools for Excel يقدم أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

اقرأ أكثر... تحميل مجاني ...

---

Office Tab يجلب الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ...