ขอเพิ่มเติมอีกหน่อยค่ะ พึ่งจะนึกขึ้นได้เดี๋ยวนี้เอง จากโค้ดคำสั่งเดิมนะคะ
กรณีย์ที่หาไฟล์ Access-1.mdb ในไดร์ฟที่ระบุไม่พบ หนูอยากให้มีข้อความ msgBox แจ้งให้ผู้ใช้ทราบว่าไม่มีไฟล์ดังกล่าว พร้อมกับระงับการโหลดด้วยค่ะ

if dir("C:\mydata\Access-1.mdb") = "" then
   msgbox "ไม่พบไฟล์ C:\mydata\Access-1.mdb"
   exit sub
endif

docmd.setwarnings false
DoCmd.RunSQL "delete * from tbl_family"
DoCmd.RunSQL "insert into tbl_family select * from tbl_family in ""C:\mydata\Access-1.mdb"""
docmd.setwarnings true
End Sub

ขอบคุณอาจารย์สันติสุขที่ให้ความกรุณาหนูเช่นเคย
ขอบพระคุณอย่างยิ่งค่ะ