Export ทั้ง Table
'DoCmd.OutputTo acOutputTable, "tbl_XXXX", acFormatXLS, "Z:\My Data\XXXX_Data.xls"

Query มีเงื่อนไข

DoCmd.OutputTo acOutputQuery, "qry_XXXX", acFormatXLS, "Z:\My Data\XXXX_Data.xls"

** จะทำเป็น Text File ก็ได้ โดยเปลี่ยนที่
DoCmd.OutputTo .....

ลองทำดูครับ

http://www.thai-access.com/yeadram_view.php?topic_id=499

http://www.thai-access.com/yeadram_view.php?topic_id=6&page=2

ในสองกระทู้นั้น ส่วนใหญ่จะเป็นการ link ตาราง แต่คุณมาลีนำมาดัดแปลงได้ครับ แก้แค่นิดหน่อย
acLink เป็น acExport

หรือไปที่หน้าแรกของเว็บ (Back to Board) ค้นหาคำว่า acExport ครับ

ขอบคุณอาจารย์ทั้งสองท่านค่ะ หนูขออนุญาตใช้โค๊ด DoCmd.OutputTo acOutputTable, "tbl_XXXX", acFormatXLS, "Z:\My Data\XXXX_Data.xls" ที่อาจารย์ Gerald แนะนำค่ะ หนูทดลองทำแล้วมันใช้ได้ดี ก็เลยไม่ได้เข้าไปดู link ที่อาจารย์ yeadrum แนะนำค่ะ
ทีีนี้อยากขอเรียนถามต่อเนื่องเพิ่มเติมอีกค่ะ คือว่า ถ้าเราจะส่งออกข้อมูล สัก 5 Teble ไปยัง 5 ไฟล์ โดยคลิกที่ปุ่มเดียวกันจะต้องขยายเพิ่มเติมคำสั่งจากเดิมนี้ อย่างไรบ้างคะ หนูลองพยายามทำแล้ว มันจะขึ้น error ให้ debug ค่ะ ขอรบกวนแนะนำอีกนิดนะคะ

ขอดู Code ที่ใช้แล้ว มันจะขึ้น error ครับ

หนูทดลองทำดู 3 table คือ tbl-123 , tbl-456 และ tbl-789 โดยใช้โค๊ดดังนี้ค่ะ

Private Sub Command0_Click()

DoCmd.OutputTo acOutputTable, "tbl-123", acFormatXLS, "D:\My Data\123_Data.xls"

DoCmd.OutputTo acOutputTable, "tbl-456", acFormatXLS, "D:\My Data\456_Data.xls"

DoCmd.OutputTo acOutputTable, "tbl-789", acFormatXLS, "D:\My Data\789_Data.xls"

End Sub

นี่แหละค่ะทีมันไม่ได้ แต่ถ้าเป็น table เดียวและใช้คำสั่งชุดเดียวมันได้ค่ะ

** You can export only one object at a time. To export

http://office.microsoft.com/en-us/access/HA012276591033.aspx

เป็นข้อจำกัดของ Accessเองหรือปล่าว (ไม่รู้ว่าผมเข้าใจถูกต้องมั๊ย ภาษาฝรั่งไม่เก่งครับ)

ใช้ได้แล้วค่ะอาจารย์ ปัญหาอยูที่หนูสะเพร่าเอง เผลอไปตั้งชื่อโฟลเดอร์ที่ไดร์ฟ D:\ ผิดเป็น My Date เท่านั้นเองค่ะ ตอนนี้เรียบแก้ร้อยแล้ว ขอขอบคุณและต้องอภัยอาจารย์ Gerald ด้วยค่ะ