الوظيفة VBA: Trim

وصف

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

بنية TRIM

Trim (نص)

مثال المعالجة VBA

دعنا نزيل المسافات الزائدة من بداية السطر ونهايته:

Sub TrimExample1()

      MsgBox Trim("test")              'العوائد: "test"
      MsgBox Trim("   test")           'العوائد: "test"
      MsgBox Trim("test   ")           'العوائد: "test"
      MsgBox Trim("   test   ")        'العوائد: "test"
      MsgBox Trim("   test   test   ") 'العوائد: "test test"
      MsgBox Trim("   ")               'عائدات: ""
    
End Sub

تقوم الوظيفة VBA Trim بإزالة المسافات من يمين ويسار النص فقط. لا يؤثر على الفراغات الزائدة داخل الشريط. استخدم Excel function TRIM لإزالة كافة المسافات الزائدة.

إزالة الفراغات الزائدة داخل النص

إزالة المسافات الزائدة داخل الخط:

Sub TrimExample2()

     MsgBox WorksheetFunction.TRIM("   test     test   ") 'العوائد: "test test"
    
End Sub

لإزالة المسافات من الجانب الأيسر للسلسلة فقط ، استخدم الوظيفة LTRIM.

لإزالة المسافات من الجانب الأيمن للسلسلة فقط ، استخدم الدالة RTRIM.