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