Snasui Excel Forum

:D ขอบคุณค่ะอาจารย์

:D ไม่ว่ากระดาษแบบไหน เมื่อสั่งพิมพ์แล้วมันจะถือเสมือนว่าเป็นการพิมพ์ทั้งหน้า ไม่สามารถกำหนดได้ว่าให้พิมพ์ทีละครึ่งหน้าแล้วค่อยเลื่อนกระดาษ

กาาสั่งพิมพ์เป็นหน้าที่ของ Application แต่การ Feed กระดาษเป็นหน้าที่ของเครื่องพิมพ์ ถ้ากำหนดได้น่าจะต้องกำหนดที่เครื่องพิมพ์มากกว่าครับ

Sub PrintOut()
        Worksheets("Sheet1").Range("B1:O23").PrintOut
          ExecuteExcel4Macro "PRINT(1,,,1,,TRUE,,,,,,2,""EPSON LQ-590 ESC/P2 บน LPT1:"",,TRUE,,FALSE)"
End Sub

เรียนอาจารย์และท่านผู้รู้ค่ะ

ขอช่วยปรับ Code VBA ใช้กระดาษต่อเนื่องขนาด 9"*11"เพื่อพิมพ์ข้อมูลครึ่งหน้าแรกลงบนกระดาษแล้วให้เครื่องพิมพ์หยุดรอ การสั่งปริ้นข้อมูลถัดไปลงบนกระดาษครึ่งหน้าหลังค่ะ

ตัวอย่างไฟล์แนบใช้กับ Code ด้านล่างนี้ ยังติดปัญหาเมื่อปริ้นครึ่งหน้าแรกแล้วกระดาษออกจากเครื่องพิมพ์ค่ะ

ความต้องการเมื่อปริ้นครึ่งหน้าแรกแล้วรอให้ปริ้นครึ่งหลังเสร็จแล้ว กระดาษออกจากเครื่องพิมพ์ค่ะ

โค้ดข้างล่านนี้ควรปรับใช้อย่างคะ
[code]Sub PrintOut()
Worksheets("Sheet1").Range("B1:O23").PrintOut
ExecuteExcel4Macro "PRINT(1,,,1,,TRUE,,,,,,2,""EPSON LQ-590 ESC/P2 บน LPT1:"",,TRUE,,FALSE)"
End Sub[/code]