كيفية تحويل السلاسل إلى أحرف صغيرة باستخدام vba

يمكنك استخدام الدالة LCase في VBA لتحويل السلاسل إلى أحرف صغيرة.

يمكنك استخدام بناء الجملة التالي لتحويل نطاق من الخلايا التي تحتوي على سلاسل إلى أحرف صغيرة:

 Sub ConvertToLowerCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = LCase(Range(" A " & i))
    Next i
    
End Sub

سيقوم هذا المثال المحدد بتحويل كل سلسلة في النطاق A2:A10 إلى أحرف صغيرة وعرض النتائج في النطاق B2:B10 .

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: تحويل السلاسل إلى أحرف صغيرة باستخدام VBA

لنفترض أن لدينا العمود التالي من السلاسل في Excel:

لنفترض أننا نريد تحويل كل سلسلة في العمود A إلى أحرف صغيرة وعرض النتائج في العمود B:

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 Sub ConvertToLowerCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = LCase(Range(" A " & i))
    Next i
    
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

يعرض العمود B كل سلسلة في العمود A بأحرف صغيرة.

ملاحظة : يمكنك العثور على الوثائق الكاملة لوظيفة LCase في VBA هنا .

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

كيفية مقارنة السلاسل في VBA
كيفية إزالة المسافات من سلسلة في VBA
كيفية استبدال الأحرف في سلسلة في VBA