สอบถามเรื่องการ error vba ค่ะ

[PooPae]

หนูเขียนโค้ดลงตัวปุ่มสีเขียวดังนี้ค่ะ
Private Sub Command477_Click()
DoCmd.RunCommand (acCmdRecordsGoToNew)
End Sub
จากนั้นเมื่อกดปุ่มเขียวขณะที่ไม่มีข้อมูลก็เกิด error ดังภาพค่ะ เลยอยากทราบว่าต้องเขียนโค้ดอย่างไรจึงดัก error ดังภาพได้บ้างคะ

[PNR]

ลองแก้เป็นแบบนี้ครับว่าได้ไหม

Private Sub Command477_Click()
Me.Dirty False
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
End sub

[PooPae]

ขึ้นดังภาพเลยค่ะ

[PNR]

Private Sub Command477_Click()
me.dirty = false
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
End sub

ลืมใส่ =
ลองดูคับว่าได้ไหม

[PooPae]

ทำได้แล้วค่ะ กราบขอบพระคุณงามๆเลยค่าา 

[PooPae]

ขอสอบถามเพิ่มเติมอีกนิดนะคะ ว่า Dirty คืออะไรหรอคะ

Private Sub Command477_Click()
me.dirty = false
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
End sub

ลืมใส่ =
ลองดูคับว่าได้ไหม

[PNR]

Dirty คือการทำงานใดๆ อยู่ครับ

สมมุติ
If me.dirty then
me.dirty = false
end if

จากโค้ด ถ้า ยังมีการแก้ไข การทำงานใดๆ อยู่ก็สั่งหยุด จากโค้ดนี้ ปกติมันก็จะบันทึกข้อมูลลงตารางแล้วนะครับ
แต่ผมใส่โค้ดบันทึกเข้าไปด้วย ไว้เป็นแนวทางเฉยๆ ครับ

[PooPae]

ขอบคุณมากๆเลยค่ะ