การใช้งาน While Loop ในภาษา VBA แบบง่ายๆ พร้อมตัวอย่าง CODE และอธิบายการทำงาน

การเขียนโปรแกรมด้วยภาษา VBA (Visual Basic for Applications) ถือเป็นหนทางที่ยอดเยี่ยมสำหรับการอ automating งานในโปรแกรม Microsoft Office เช่น Excel, Word, และ Access หากคุณเพิ่งเริ่มเรียนรู้เกี่ยวกับภาษา VBA แล้ว การทำงานกับ Loop จะเป็นเรื่องสำคัญที่คุณควรเข้าใจ โดยเฉพาะ while loop ที่ช่วยในการทำงานซ้ำในลักษณะสุ่มของเงื่อนไข

What is a While Loop?

While Loop ใน VBA จะทำซ้ำคำสั่งในบล็อกจนกว่าเงื่อนไขที่กำหนดจะเป็นเท็จ (False) กล่าวคือ เมื่อโปรแกรมพบเงื่อนไขที่เป็นจริง (True) มันจะทำงานจนกว่าจะถึงจุดที่เงื่อนไขนั้นเป็นเท็จ

Syntax ของ While Loop

 While condition
    ' Block of code to be executed
Wend

ตัวอย่างการใช้งาน While Loop

เพื่อให้เข้าใจการทำงานของ While Loop ได้ดีขึ้น มาลองมองการใช้กรณีศึกษาที่เจ๋งกันค่ะ Surrounded within the concept of data processing and quality control.

Use Case

มาลองนึกภาพว่าเรามีรายชื่อของนักเรียนในโรงเรียน และเราต้องการที่จะนับจำนวนนักเรียนที่มีคะแนนเกิน 60 เพื่อที่เราจะได้รู้ว่านักเรียนคนไหนที่ผ่านหรือไม่ เราสามารถใช้ While Loop เพื่อทำงานนี้ได้

ตัวอย่างโค้ด VBA

 Sub CountStudents()
    Dim score As Integer
    Dim count As Integer
    Dim i As Integer

    ' เริ่มต้นนับจำนวน
    count = 0
    i = 1

    ' สมมติว่าตารางคะแนนนักเรียนเริ่มจาก A1 ถึง A100
    ' เมื่อมองว่าคะแนนเก็บอยู่ในคอลัมน์ A
    While i <= 100
        score = Cells(i, 1).Value ' เอาค่าคะแนนจากเซลล์ A1 ออกมา

        ' ถ้าคะแนนมากกว่า 60 จะนับเพิ่ม
        If score > 60 Then
            count = count + 1
        End If

        i = i + 1 ' ไปที่นักเรียนคนถัดไป
    Wend

    MsgBox "จำนวนคะแนนนักเรียนที่ผ่านคือ: " & count
End Sub

การทำงานของโค้ด

1. เริ่มต้นตัวแปร `score` เพื่อเก็บข้อมูลคะแนนของนักเรียน

2. ตัวแปร `count` คือเก็บจำนวนของนักเรียนที่ผ่าน

3. `i` จะทำหน้าที่เป็นตัวนับตั้งแต่ 1 ถึง 100

4. While Loop จะทำงานไปเรื่อยๆ จนกว่า i จะมากกว่า 100

5. ในแต่ละรอบของ loop คะแนนของนักเรียนจะถูกตรวจสอบ ถ้าคะแนนมากกว่า 60 เราจะเพิ่มค่าของตัวแปร `count` ขึ้น 1

6. หลังจากครบทุกนักเรียน จะมี Message Box ปรากฏขึ้นแสดงจำนวนของนักเรียนที่มีคะแนนผ่าน

ข้อควรระวัง

ทำไมต้องเรียนรู้การใช้ While Loop?

การเข้าใจการใช้ While Loop และการเขียนโปรแกรมต่างๆ ใน VBA จะช่วยให้คุณสามารถแก้ไขปัญหาที่ซับซ้อนใน Microsoft Excel รวมถึงช่วยให้อัตโนมัติการทำงานที่เคยใช้มือคนทำ เช่น การสร้างรายงาน การจัดการข้อมูลที่เป็นจำนวนมาก ซึ่งในระยะยาวจะช่วยประหยัดเวลาและแรงงานมากเลยทีเดียว

เรียนรู้มากขึ้นกับ EPT

หากคุณต้องการเรียนรู้การเขียนโปรแกรมในเชิงลึก ไม่ว่าจะเป็นการใช้ VBA หรือภาษาโปรแกรมอื่นๆ ที่จะทำให้คุณเป็นนักพัฒนาที่เชี่ยวชาญ เรียนรู้กับเราที่ EPT (Expert-Programming-Tutor) ที่เราพร้อมที่จะช่วยเสริมทักษะของคุณและส่งเสริมให้คุณเป็นมืออาชีพด้านโปรแกรม ด้วยการสอนที่เข้าถึงง่ายและมีการประยุกต์ใช้งานจริง คุณจะไม่ต้องมาเผชิญกับปัญหาเหล่านี้คนเดียวอีกต่อไป!

การเขียนโปรแกรมนั้นไม่ยากอย่างที่คิด เริ่มต้นศึกษาได้แล้ววันนี้ที่ EPT!

หมายเหตุ: ข้อมูลในบทความนี้อาจจะผิด โปรดตรวจสอบความถูกต้องของบทความอีกครั้งหนึ่ง บทความนี้ไม่สามารถนำไปใช้อ้างอิงใด ๆ ได้ ทาง EPT ไม่ขอยืนยันความถูกต้อง และไม่ขอรับผิดชอบต่อความเสียหายใดที่เกิดจากบทความชุดนี้ทั้งทางทรัพย์สิน ร่างกาย หรือจิตใจของผู้อ่านและผู้เกี่ยวข้อง