snasui.com ยินดีต้อนรับ ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
With inputWks
Set myRng = .Range(myCopy)
If Not ActiveWorkbook.Saved Then
Msg = "ท่านกรอกข้อมูลถูกต้องครบถ้วนหรือไม่? "
Ans = MsgBox(Msg, vbQuestion + vbYesNoCancel)
Select Case Ans
Case vbYes
ThisWorkbook.Saved = True
Case vbNo
Cancel = True
Case vbCancel
Cancel = True
Exit Sub
End Select
End If
ตอนนี้ ติดปัญหาตรงที่ Case vbNo ใช้คำสั่งอะไรให้มันกดออกคล้ายๆ Cancel ครับ ตอนนี้ กด No มันดันส่งข้อมูลไปซะงั้น ครับอาจารย์ รบกวนด้วยครับ