สิ่งที่ผมนึกออกขณะนี้คือ การเพิ่มตารางพร้อมฟีลด์ 2 ฟีลด์หรือมากว่านี้ เพื่อกำหนดการพิมพ์ดังกล่าวครับ ว่าเป็นรายงานชื่ออะไร และอยู่ในสถานภาพการพิมพ์แบบใด

โดยให้ตั้งค่าให้เป็น ต้นฉบับ ไว้เป็นค่าตั้งต้น แล้วเปลี่ยนไปเป็น สำเนา ตอนที่ได้ถูกสั่งพิมพ์ไปแล้ว 1 ชุด เมื่อพิมพ์เสร็จ ก็ให้เปลี่ยนมาเป็น ต้นฉบับตามเดิม

ตรงนี้เป็นแนวทางนะครับ แล้วอาจใช้ DLookup() เข้ามาช่วยหาว่าสถานภาพการพิมพ์เป็นแบบใด

ลองดูครับ

ขอบคุณ อ.สุภาพ มากครับ ที่ช่วยตอบ แต่ตอนนี้ผมได้วิธีต้องการแล้ว ( แบบลูกทุ่ง )เผอิญอ่าน Help File แล้วเจอ คือ ใช้คำสั่ง DoCmd.PrintOut (วิธีใช้ดูใน Help File โดยพิมพ์ PrintOut ในการค้นหา แล้วเลือก PrintOut Action)
โดยผมทำแบบนี้ครับ สมมุติ Report ชื่อ RptCopy

1.ใน Report สร้าง Label ขึ้นมาหนึ่งอันเขียนอะไรก็ได้ แล้วตั้งค่า Visible
เป็น No เพื่อเวลา Preview จะได้ไม่เห็น สมมุติ Label ชื่อ LblCopy
2.สร้าง Function ขึ้นมาหนึ่งตัวเก็บไว้ใน Module

Function PrtCopy( )
Reports!RptCopy.Visible=True

Reports!RptCopy.Caption ="ต้นฉบับ"
Docmd.Printout , , ,1

Reports!RptCopy.Caption ="สำเนา"
Docmd.Printout , , ,1
End Function

3.ทำปุ่มไว้ใน Toolbar โดย OnAction ให้เลือก Function ตามข้อที่ 2 ใส่ไว้ในReport ที่ต้องเราต้องการ

เวลาใช้คือเปิด Report ที่เราได้กำหนดไว้เป็นแบบ Preview เมื่อต้องการพิมพ์ก็กดปุ่มที่เราได้สร้าง ก็จะได้ รายงาน 2 ชุด โดยชุดที่ 1 จะมีคำว่า "ต้นฉบับ" ส่วนชุดที่ 2 จะมีคำว่า "สำเนา"
คิดว่าคงจะมีประโยชน์กับคนอื่นบ้าง เลยเล่าสู่กันฟังครับ
ขอบคุณครับ

อยากเห็นตัวอย่างจังเลยว่าทำอย่างไร พอจะมีมั้ย

เรียน คุณง่วงนอน

ไม่ทราบว่า จะขอทำตัวอย่างเล็กให้ดูพอล่อน้ำย่อยได้หรือเปล่าครับ

นำมาส่งให้แล้ว ขอรับ

เจ๋งมากกกกก ค่ะ คิดได้งัย++ นับถือ นับถือ