1. เพิ่มฟีลด์ prited ลงไปในตารางเป้าหมาย กำหนดให้เป็น Yes/No

2. สร้าง Query1 เพื่อเลือกเฉพาะข้อมูลที่มีค่า printed เป็น False (No) ไปพิมพ์

SELECT ตาราง1.*
FROM [ตาราง1]
WHERE (((ตาราง1.printed)=False));

3. สร้าง Update query ชื่อ query2 เพื่อเปลี่ยน printed ของข้อมูลที่ปริ้นท์แล้ว ให้เป็น True ดังนี้

UPDATE [ตาราง1] SET [ตาราง1].printed = True
WHERE (((ตาราง1.printed)=False));

4. สร้าง Form ขึ้นมาเพื่อใช้พิมพ์รายงานเป้าหมาย โดยเรียกผ่านปุ่ม Command

Private Sub cmdPrint_Click()
DoCmd.OpenReport "Report1"
CurrentDb.Execute "Query2"
End Sub

ซึ่งเมื่อปริ้นท์เสร็จแล้ว จะมีการเรียก query2 เพื่อเปลี่ยน printed ของข้อมูลที่ปริ้นท์แล้วให้เป็น True

ตรงนี้ถ้าปริ้นท์ติดขัด มันก็จะทำการเปลี่ยนให้เป็น True เช่นกัน

ลองดูครับ