Snasui Excel Forum

Posted: **Wed Jun 18, 2014 8:38 pm**

เมื่อไม่มีการเติมค่า ผมออกแบบให้มี MsgBox แจ้งเตือน

แต่ยังเกิดการ Debug ทำอย่างไรดีครับ

หากต้องการให้โปรแกรมทำงานต่อหลังจากกด OK ของ MsgBox

Posted: **Wed Jun 18, 2014 8:47 pm**

ตัวอย่างการปรับ Code ตามด้านล่างครับ กรณีไม่เติมค่าให้ออกจาก Procedure

Code: Select all

Private Sub CommandButton1_Click()
    If TB1.Value = "" Then
        MsgBox "XXX"
        Exit Sub
    Else
        TB2.Value = TB1.Value * 1000
    End If
End Sub

Posted: **Thu Jun 19, 2014 8:35 pm**

ขอบคุณครับ

Snasui Excel Forum

การยกเลิกคำสั่ง เมื่อไม่มีการเติมค่า

การยกเลิกคำสั่ง เมื่อไม่มีการเติมค่า

Re: การยกเลิกคำสั่ง เมื่อไม่มีการเติมค่า

Re: การยกเลิกคำสั่ง เมื่อไม่มีการเติมค่า