วิธีใช้ do- while loop ใน Excel VBA

ต้องการทำงานซ้ำ ๆ โดยอัตโนมัติใน Excel VBA หรือไม่? ดังนั้น เรามาเรียนรู้วิธีใช้ลูป Do-While เพื่อดำเนินการชุดของการดำเนินการที่ทำซ้ำจนกว่าจะตรงตามเงื่อนไข

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

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

Do-While Loop ใน Excel VBA คืออะไร

การวนซ้ำ do- While ใน Excel นั้นค่อนข้างง่าย คุณสามารถใช้การวนซ้ำนี้เพื่อกำหนดราคาเสนอได้หากคุณต้องการสร้างผลลัพธ์ที่ต้องการตามเงื่อนไขเฉพาะ การวนซ้ำจะดำเนินการเมื่อเงื่อนไขถูกกำหนดให้เป็น True เมื่อโปรแกรมพบค่า False การวนซ้ำจะสิ้นสุดและพิมพ์ผลลัพธ์ในเซลล์ที่ระบุ

คุณสามารถใช้ do- While loop ในขั้นตอนต่างๆ โดยมีเกณฑ์ต่างกันได้ คุณสามารถใช้หลายลูปภายในลูปด้านนอกหลักเพื่อปรับปรุงการใช้งานได้

สูตรของ do- While loop ใน Excel VBA

ลูป do- While มีโครงสร้างที่กำหนดไว้ล่วงหน้าซึ่งคุณต้องปฏิบัติตาม เพื่อให้แน่ใจว่าฟังก์ชันการทำงานจะทำงานได้อย่างราบรื่น นี่คือสูตรอ้างอิง:

Do while [condition_reference]

[Criteria statements]

Loop

การวนซ้ำเริ่มต้นด้วยคีย์เวิร์ด do- While ตามด้วยการอ้างอิงเริ่มต้นและสิ้นสุด ส่วนแรกของสูตรจะควบคุมการวนซ้ำทั้งหมด ถัดไป คุณต้องกำหนดคำสั่งที่จะปรับใช้ในแต่ละครั้งที่ลูปทำงาน

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

เขียนโค้ดสำหรับ do- While loop แรก

สมมติว่าคุณต้องการแสดงผลคูณของสองในคอลัมน์ A เงื่อนไขคือต้องพิมพ์ตัวเลขจนกระทั่งตัวนับถึง 20

ในการดำเนินการนี้ ให้ไปที่แท็บนักพัฒนาซอฟต์แวร์ใน Excel แล้วเปิดตัวแก้ไขโค้ด หรือกดAlt + F11เพื่อเปิดโดยตรง ในหน้าต่างตัวแก้ไขโค้ด คลิกแท็ บ แทรกและเพิ่มโมดูลใหม่

คุณต้องเขียนโค้ดทั้งหมดภายในหน้าต่างโมดูลนี้ เพิ่มรหัสต่อไปนี้ภายในโมดูล:

Sub dowhileloop()

Dim a As Integer

a = 1

Do While a <= 10="" cells(a,="" 1)="2" *="" a="" a="a" +="" 1="" loop="" end="">

การวิเคราะห์รหัส

• การใช้รูทีนย่อย : หากต้องการเริ่มเขียนโค้ดใน Excel VBA ให้สร้างเชลล์ภายนอกโดยใช้ฟังก์ชันรูทีนย่อย (ย่อย) ตั้งชื่อให้มีความหมายเหมาะสมกับวัตถุประสงค์ของโค้ด ในตัวอย่างนี้ คุณสามารถใช้ชื่อ do Whileloop ตามด้วย ()
• การกำหนดประเภทข้อมูล : ต้องใช้ฟังก์ชัน dim เพื่อประกาศประเภทข้อมูล ด้วยการประกาศประเภทข้อมูล คุณสามารถเขียนโค้ดที่มีประสิทธิภาพและปรับปรุงความเร็วในการดำเนินการได้ ในกรณีนี้ ตัวแปรaมีค่าจำนวนเต็ม ดังนั้นให้ใช้ชนิดข้อมูลจำนวนเต็มเพื่อกำหนด คุณสามารถจัดเก็บหมายเลขแถวเริ่มต้นในตัวแปรนี้ เพื่อประกาศจุดข้อมูลเริ่มต้นของลูป do- While
• Define the Condition : ตอนนี้ได้เวลาผ่านเงื่อนไขเพื่อควบคุม do- While loop คุณสามารถใช้คีย์เวิร์ด do while ตามด้วยเงื่อนไขได้ เช่น หากคุณต้องการวนซ้ำ 10 ครั้ง ให้เขียน < =="">
• ผ่านคำสั่งดำเนินการ : สิ่งสำคัญคือคุณต้องทราบความแตกต่างระหว่างฟังก์ชันเซลล์และฟังก์ชัน Range ใน VBA ฟังก์ชันเซลล์ใช้การอ้างอิงแถวและคอลัมน์ใน VBA ตัวอย่างเช่น ในการวนซ้ำครั้งแรก เมื่อค่า a = 1 สูตรของเซลล์จะเป็น (1,1) ในหน่วยความจำของ VBA สิ่งนี้จะแปลเป็นเซลล์ A1 แต่ละครั้งที่ดำเนินการวนซ้ำ ค่าของตัวแปรที่กำหนดจะเพิ่มขึ้น และการอ้างอิงจะย้ายไปยังเซลล์ถัดไปที่มีอยู่
• ตัวแปรที่เพิ่มขึ้น : คุณสามารถส่งคำสั่ง a = a + 1 เพื่อเพิ่มค่าของเซลล์ วิธีนี้จะย้ายการวนซ้ำไปยังส่วนถัดไปของเงื่อนไข การวนซ้ำยังคงทำงานต่อไปจนกว่าเงื่อนไขจะประเมินเป็นเท็จ
• ออกจากเงื่อนไขลูป : เมื่อเงื่อนไขเป็นเท็จ ให้ออกจากลูปโดยใช้คีย์เวิร์ด Loop และสุดท้ายจะออกจากรูทีนย่อยโดยใช้ End Sub
• เรียกใช้โค้ด : โค้ดพร้อมแล้ว คุณเพียงแค่ต้องกด F5 หรือปุ่มเล่นสีเขียวในแถบเมนูด้านบนเพื่อเรียกใช้โค้ดนี้

ผลลัพธ์สุดท้ายจะแสดงรายการตัวเลขตั้งแต่ 2 ถึง 20 ในคอลัมน์ A

ด้านบนคือวิธีใช้ do- While loop ใน Excel VBA หวังว่าบทความนี้จะเป็นประโยชน์กับคุณ