انتقل إلى المحتوى الرئيسي

كيفية إزالة / حذف جميع المسافات بعد الحرف الأخير في إكسيل؟

لحذف كل المسافات بعد الحرف الأخير (المسافات اللاحقة) من الخلايا ، ماذا ستفعل؟ ستوضح لك هذه المقالة طريقتين للتعامل معها.

قم بإزالة جميع المسافات بعد الحرف الأخير برمز VBA
قم بإزالة جميع المسافات بسهولة بعد الحرف الأخير باستخدام Kutools for Excel


قم بإزالة جميع المسافات بعد الحرف الأخير برمز VBA

يمكن أن تساعدك التعليمات البرمجية لـ VBA التالية في إزالة جميع المسافات بعد الحرف الأخير من الخلايا.

1. حدد الخلايا التي تريدها لإزالة جميع المسافات بعد الحرف الأخير ، ثم اضغط قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، الرجاء الضغط إدراج > وحدة. ثم انسخ والصق رمز فبا التالي في نافذة الوحدة النمطية.

كود فبا: أزل كل المسافات بعد الحرف الأخير

Sub NoSpaces()
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xCell.Value = RTrim(xCell.Value)
    Next
    Application.ScreenUpdating = True
End Sub

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

الآن تتم إزالة جميع المسافات بعد الحرف الأخير من الخلايا المحددة على الفور.


قم بإزالة جميع المسافات بسهولة بعد الحرف الأخير باستخدام Kutools for Excel

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

قبل التطبيق كوتولس ل إكسيلالرجاء قم بتنزيله وتثبيته أولاً.

1. حدد نطاق الخلايا الذي تريد إزالة جميع المسافات بعد الحرف الأخير. ثم اضغط كوتولس > نص > إزالة المسافات. انظر لقطة الشاشة:

2. في ال إزالة المسافات مربع الحوار ، الرجاء تحديد مسافات زائدة الخيار ، ثم انقر فوق OK زر. انظر لقطة الشاشة:

ثم تتم إزالة جميع المسافات بعد الحرف الأخير للخلايا المحددة مرة واحدة.

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

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

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

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة 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٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations