If…Then…Else คือคำสั่งเพื่อการตัดสินใจอย่างหนึ่ง เป็นการเขียนตรวจสอบเงื่อนไขและกำหนดการแสดงผลหากว่าเข้าเงื่อนไขนั้น สามารถตรวจสอบได้หลายเงื่อนไขได้ตามความต้องการ ปกติแล้วในการทำงานใด ๆ ก็ตามมักจะมีการตัดสินใจเข้ามาเกี่ยวข้องด้วยเสมอ การเขียนโปรแกรมก็เช่นเดียวกัน มักจะมีทางเลือกและเงื่อนไขให้ต้องตัดสินใจอยู่เป็นประจำและเป็นเรื่องปกติธรรมดาของการเขียนโปรแกรม จึงต้องเรียนรู้วิธีการใช้งานคำสั่งที่จะใช้เพื่อการตัดสินใจเหล่านั้นเพื่อทำงานที่มีความซับซ้อนได้อย่างสะดวก สำหรับการตัดสินใจต่าง ๆ เราไม่สามารถบันทึกด้วย Macro ได้ จำเป็นต้องเขียนขึ้นมาเอง
Video ด้านล่างนี้อธิบายและยกตัวอย่างการใช้งาน If Then Else ประกอบการเขียนโปรแกรม ซึ่งจะประกอบด้วยการใช้งาน 3 รูปแบบตามด้านล่าง
1. If…Then
Sub DecisionIf() If Range("e2").Value > 10000 Then Range("f2").Value = 20 End If End Sub |
ความหมายคือ หาก E2 มีค่ามากกว่า 10,000 แล้วให้ F2 มีค่าเป็น 20 หากไม่ใช่ ไม่ต้องแสดงผลใด ๆ
2. If…Then…Else
Sub DecisionIf_Else() If Range("e2").Value > 10000 Then Range("f2").Value = 20 Else Range("f2").Value = 50 End If End Sub |
ความหมายคือ หาก E2 มีค่ามากกว่า 10,000 แล้วให้ F2 มีค่าเป็น 10 หากไม่ใช่ ให้ F2 มีค่าเป็น 50
3. If…Then…ElseIf
Sub DecisionIf_ElseIf() If Range("e2").Value <= 2000 Then Range("f2").Value = 20 ElseIf Range("e2") <= 5000 Then Range("f2").Value = 50 Else Range("f2").Value = 100 End If End Sub |
ความหมายคือ หาก E2 มีค่าน้อยกว่าหรือเท่ากับ 2,000 แล้วให้ F2 มีค่าเป็น 20 หากไม่ใช่ ให้ตรวจสอบต่อว่า E2 มีค่าน้อยกว่าหรือเท่ากับ 5,000 หรือไม่ หากใช่ให้ F2 มีค่าเท่า 50 หากไม่เข้าเงื่อนไขใดให้ F2 มีค่าเป็น 100
Video อธิบาย If…Then…Else
สามารถดาวน์โหลดไฟล์ตัวอย่างได้ที่ If…Then…Elseกรณีมีปัญหาการใช้งาน Excel and VBA สามารถสอบถามได้ที่ Excel Forum
Pingback: VBA Excel - Select...Case - Excel Tips and Tricks by Santipong Nasui