وظيفة VBA LCase | تحويل النص إلى أحرف صغيرة باستخدام VBA
وظيفة Excel VBA LCase
LCase هي دالة مضمنة في vba تُستخدم لتحويل سلسلة إدخال مقدمة إليها في الأحرف الصغيرة ، وهي تأخذ وسيطة واحدة وهي السلسلة كمدخل والمخرج الناتج عن هذه الوظيفة عبارة عن سلسلة ، الشيء الوحيد الذي يجب الاحتفاظ به في الاعتبار أن هذه الوظيفة تحول جميع الوظائف إلى أحرف صغيرة ، وليس مجرد حرف واحد.
يجب أن تكون قد جربت نفس الصيغة (LOWER) مثل excel في VBA ولم تجدها. لأنه في VBA الصغيرة تسمى مختلفة قليلا. في VBA ، يكون الاسم المختصر ، مثل "LCASE". هنا يرمز الحرف "L" إلى "LOWER" ، لذا تُقرأ الصيغة "LOWERCASE".
بناء الجملة
- String: ليست سوى القيمة النصية التي نحاول تحويلها إلى الأحرف الصغيرة. يمكننا تزويد النص مباشرة بالصيغة ، ويمكن أن يكون مرجع خلية ، ويمكن أن يكون من خلال متغير أيضًا.
كيفية تحويل النص بأحرف صغيرة في VBA؟
يمكنك تنزيل قالب Excel VBA LCase من هنا - قالب Excel VBA LCaseمثال 1
دعنا نحاول تحويل القيمة النصية "Hello Good Morning" إلى الأحرف الصغيرة باستخدام وظيفة LCASE.
الخطوة 1: ابدأ الإجراء الفرعي عن طريق تسمية ماكرو excel.
رمز:
LCase_Example1 الفرعي () End Sub
الخطوة 2: قم بتعريف المتغير k على أنه String.
رمز:
LCase_Example1 () خافت k كـ String End Sub
الخطوة 3: خصص القيمة للمتغير "k" بتطبيق دالة "LCASE".
الخطوة 4: هنا السلسلة هي القيمة النصية المرغوبة التي نحاول تحويلها إلى أحرف صغيرة وقيمة السلسلة المطلوبة هي "Hello Good Morning".
رمز:
Sub LCase_Example1 () Dim k As String k = LCase ("Hello Good Morning") End Sub
الخطوة 5: اعرض الآن نتيجة المتغير "k" في مربع الرسالة.
رمز:
Sub LCase_Example1 () Dim k As String k = LCase ("Hello Good Morning") MsgBox k End Sub
حسنًا ، تم إجراء الترميز. لنقم بتشغيل الكود لنرى النتيجة.
لذا حولت LCase القيمة النصية "Hello Good Morning" إلى "hello good morning" باستخدام تقنية الترميز البسيطة.
المثال رقم 2
لقد رأينا كيف تعمل وظيفة LCASE في VBA. في المثال أعلاه ، قمنا بتوفير القيمة للصيغة نفسها مباشرةً. الآن سنرى كيف يمكننا استخدام القيمة المرجعية للخلية في الصيغة.
افترض أن لديك كلمة "Hello Good Morning" في الخلية A1 مثل الصورة أدناه.
الخطوة 1: سنقوم بتحويل قيمة الخلية A1 إلى الحالة الصغيرة من خلال إظهار النتيجة في خلية النطاق B1 ، لذلك سيكون الرمز هو النطاق ("B1").
رمز:
نطاق LCase_Example2 () الفرعي ("B1"). قيمة نهاية فرعية
الخطوة 2: في الخلية B1 من خلال وظيفة LCASE ، سنخزن النتيجة ، لذا افتح الوظيفة.
الخطوة 3: في هذا المثال ، قيمة سلسلة VBA هي مرجع خلية ، وليست قيمة مباشرة. لذا أعط مرجع الخلية قيمة المدى ("A1").
رمز:
نطاق LCase_Example2 () الفرعي ("B1"). القيمة = LCase (النطاق ("A1"). القيمة) End Sub
حسنًا ، لقد انتهينا من جزء ترميز VBA. قم بتشغيل الكود وشاهد السحر في خلية B1.
المثال رقم 3
لا يمثل تحويل قيمة خلية واحدة أو قيمة مباشرة واحدة التحدي الأكبر. عندما نحتاج إلى التعامل مع عدد "n" من القيم في ورقة العمل ، فإننا نحتاج إلى تطبيق حلقات للتكرار عبر جميع الخلايا وتحويلها إلى قيم صغيرة.
افترض أدناه البيانات التي لديك في ورقة عمل Excel.
إذا لم تكن على دراية بالحلقات ، فأنت بحاجة إلى العودة إلى أساسيات ترميز VBA ، وارجع إلى مقالاتنا حول "VBA Loops" للحصول على قدر معقول من المعرفة حول الحلقات. سيحول الكود أدناه الأسماء أعلاه إلى الأحرف الصغيرة
رمز:
Sub LCase_Example3 () خافت k بطول k = 2 إلى 8 خلايا (k ، 2) .Value = LCase (Cells (k، 1) .Value) Next k End Sub
سيؤدي هذا إلى تحويل جميع القيم النصية من الصف 2 إلى الصف 8 في دالة الأحرف الصغيرة.
بناءً على الخلايا الخاصة بك ، يمكنك زيادة حد الحلقة من 8 إلى أي رقم صف آخر من بياناتك.
