ฟังก์ชัน Excel VBA LCase
LCaseเป็นฟังก์ชัน inbuilt ใน vba ซึ่งใช้ในการแปลงสตริงอินพุตที่จัดให้เป็นตัวพิมพ์เล็กโดยใช้อาร์กิวเมนต์เดียวซึ่งเป็นสตริงเป็นอินพุตและเอาต์พุตที่สร้างโดยฟังก์ชันนี้คือสตริงซึ่งเป็นสิ่งหนึ่งที่ต้องเก็บไว้ โปรดทราบว่าฟังก์ชันนี้จะแปลงฟังก์ชันทั้งหมดเป็นตัวพิมพ์เล็กไม่ใช่แค่อักขระตัวเดียว
คุณต้องลองใช้สูตรเดียวกัน (LOWER) กับ excel ใน VBA แล้วและคุณไม่พบ เนื่องจากในตัวพิมพ์เล็ก VBA มีชื่อแตกต่างกันเล็กน้อย ใน VBA จะอยู่ในชื่อทางลัดเช่น "LCASE" ในที่นี้“ L” ย่อมาจาก“ LOWER” ดังนั้นสูตรจึงอ่านว่า“ LOWERCASE”
ไวยากรณ์
- String:ไม่มีอะไรนอกจากค่าข้อความที่เราพยายามแปลงเป็นตัวพิมพ์เล็ก เราสามารถใส่ข้อความลงในสูตรได้โดยตรงสามารถอ้างอิงเซลล์และสามารถผ่านตัวแปรได้เช่นกัน
วิธีการแปลงข้อความเป็นตัวพิมพ์เล็กใน VBA
คุณสามารถดาวน์โหลด VBA LCase Excel Template ได้ที่นี่ - VBA LCase Excel Templateตัวอย่าง # 1
มาลองแปลงค่าข้อความ“ สวัสดีอรุณสวัสดิ์” เป็นตัวพิมพ์เล็กโดยใช้ฟังก์ชัน LCASE
ขั้นตอนที่ 1:เริ่มกระบวนการย่อยโดยตั้งชื่อมาโคร excel
รหัส:
Sub LCase_Example1 () End Sub
ขั้นตอนที่ 2:ประกาศตัวแปร k เป็น String
รหัส:
Sub LCase_Example1 () Dim k เป็น String End Sub
ขั้นตอนที่ 3:กำหนดค่าให้กับตัวแปร“ k” โดยใช้ฟังก์ชัน“ LCASE”
ขั้นตอนที่ 4:สตริงที่นี่คือค่าข้อความที่เราต้องการซึ่งเรากำลังพยายามแปลงเป็นตัวพิมพ์เล็กและค่าสตริงที่ต้องการคือ“ สวัสดีอรุณสวัสดิ์”
รหัส:
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 ("สวัสดีตอนเช้า") MsgBox k End Sub 
โอเคเข้ารหัสเสร็จแล้ว ลองรันโค้ดเพื่อดูผลลัพธ์
ดังนั้น LCase จึงแปลงค่าข้อความ“ สวัสดีอรุณสวัสดิ์” เป็น“ สวัสดีตอนเช้า” ด้วยเทคนิคการเขียนโค้ดง่ายๆ
ตัวอย่าง # 2
เราได้เห็นว่าฟังก์ชัน LCASE ทำงานอย่างไรใน VBA ในตัวอย่างข้างต้นเราได้ระบุค่าให้กับสูตรโดยตรง ตอนนี้เราจะมาดูกันว่าเราจะใช้ค่าอ้างอิงเซลล์กับสูตรได้อย่างไร
สมมติว่าคุณมีคำว่า "สวัสดีตอนเช้า" ในเซลล์ A1 เหมือนภาพด้านล่าง
ขั้นตอนที่ 1:เราจะแปลงค่าเซลล์ A1 เป็นตัวพิมพ์เล็กโดยแสดงผลลัพธ์ในเซลล์ช่วง B1 ดังนั้นรหัสจะเป็นRange (“ B1”) ค่า =
รหัส:
Sub LCase_Example2 () ช่วง ("B1") ค่า End Sub 
ขั้นตอนที่ 2:ในเซลล์ B1 ถึงฟังก์ชัน LCASE เราจะจัดเก็บผลลัพธ์ดังนั้นเปิดฟังก์ชัน
ขั้นตอนที่ 3:ในตัวอย่างนี้ค่าสตริง VBA เป็นการอ้างอิงเซลล์ไม่ใช่ค่าโดยตรง ดังนั้นให้การอ้างอิงเซลล์เป็นช่วง (“ A1”) ค่า
รหัส:
Sub LCase_Example2 () Range ("B1"). Value = LCase (Range ("A1"). Value) End Sub 
ตกลงเราทำส่วนการเข้ารหัส VBA เสร็จแล้ว เรียกใช้รหัสและดูความมหัศจรรย์ในเซลล์ B1
ตัวอย่าง # 3
การแปลงค่าเซลล์เดียวหรือค่าโดยตรงเพียงค่าเดียวไม่ใช่สิ่งที่ท้าทายที่สุด เมื่อเราต้องการจัดการกับจำนวน“ n” ของค่าในแผ่นงานเราจำเป็นต้องใช้ลูปเพื่อวนรอบเซลล์ทั้งหมดและแปลงเป็นค่าตัวพิมพ์เล็ก
สมมติว่าด้านล่างคือข้อมูลที่คุณมีในแผ่นงาน excel
หากคุณไม่ทราบเกี่ยวกับลูปคุณต้องกลับไปที่พื้นฐานของการเข้ารหัส VBA โปรดอ่านบทความของเราเกี่ยวกับ "VBA Loops" เพื่อรับความรู้เกี่ยวกับลูป โค้ดด้านล่างจะแปลงชื่อด้านบนเป็นตัวพิมพ์เล็ก
รหัส:
Sub LCase_Example3 () Dim k As Long สำหรับ k = 2 ถึง 8 เซลล์ (k, 2) .Value = LCase (Cells (k, 1) .Value) ถัดไป k End Sub
สิ่งนี้จะแปลงค่าข้อความทั้งหมดจากแถว 2 เป็นแถวที่ 8 ในฟังก์ชันตัวพิมพ์เล็ก
จากเซลล์ของคุณคุณสามารถเพิ่มขีด จำกัด ของลูปจาก 8 เป็นจำนวนแถวสุดท้ายของข้อมูลของคุณได้