กระทู้เก่าบอร์ด อ.Yeadram
1,389 3
URL.หัวข้อ /
URL
รบกวนขอสูตรปุ่มสั่งปริ้นหน่อยครับ
ขอสูตรสั่งปริ้นครับ
กดปุ่มละก่ปริ้นเลยครับ
กดปุ่มละก่ปริ้นเลยครับ
3 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R17347
ขอบคุณครับ
3 @R17349
PrintOut คำสั่งพิมพ์รายงาน
expression.PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies)
หากต้องการสร้างปุ่มสำหรับการสั่งพิมพ์บน Report ที่ใช้อยู่ปัจจุบัน โดยระบุเลขที่หน้า 1 ถึง หน้า 2 คุณภาพสูง จำนวน 1 ก๊อปปี้
ที่ปุ่ม Event > On Click >
DoCmd.PrintOut , 1, 2, acHigh, 1
หากต้องการสร้างปุ่มสำหรับสั่งพิมพ์ Report บนฟอร์ม โดย Report นั้นยังไม่ได้เปิดใช้งานอยู่ โดย Report ชื่อ rptResearch
ที่ปุ่ม Event > On Click >
DoCmd.OpenReport "rptResearch", acViewPreview
DoCmd.PrintOut , 1, 2, acHigh, 1
expression.PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies)
หากต้องการสร้างปุ่มสำหรับการสั่งพิมพ์บน Report ที่ใช้อยู่ปัจจุบัน โดยระบุเลขที่หน้า 1 ถึง หน้า 2 คุณภาพสูง จำนวน 1 ก๊อปปี้
ที่ปุ่ม Event > On Click >
DoCmd.PrintOut , 1, 2, acHigh, 1
หากต้องการสร้างปุ่มสำหรับสั่งพิมพ์ Report บนฟอร์ม โดย Report นั้นยังไม่ได้เปิดใช้งานอยู่ โดย Report ชื่อ rptResearch
ที่ปุ่ม Event > On Click >
DoCmd.OpenReport "rptResearch", acViewPreview
DoCmd.PrintOut , 1, 2, acHigh, 1
Time: 0.3327s
หรือ vba DoCmd.OpenReport "ชื่อ report", acViewReport