Snasui Excel Forum

สวัสดีครับท่านอาจารย์และผู้รู้ทุกท่าน

เคยใช้ excel 2007 สร้าง macro ให้สั่งพิมพ์แต่ละชีทออกคนละเครื่องพิมพ์ได้เลย
แต่พอนำมาใช้ 2010 จะสั่งพิมพ์ออกเฉพาะเครื่องพิมพ์ที่เลือกล่าสุด
ทดลองใช้ code vba
application.activeprinter = "ชื่อเครื่องพิมพ์"
ก็ขึ้นว่า runtime error '1004':
method 'ActivePrinter' of object '_Application' faield
ไม่ทราบว่าผิดพลาดแต่ประการใด
เลยอยากขอคำชี้แนะ เพื่อนำสูตรไปผูกสร้างเป็นปุ่มเลือกเครื่องพิมพ์ ไว้กดเปลี่ยนเลย

ขอบคุณสำหรับทุกคำชี้แนะสั่งสอนครับผม

ลองสั่ง Print (โดยเลือก Printer เครื่องที่ต้องการกำหนดลงใน Code) ตามปกติดูครับว่า Print ได้หรือไม่

หาก Print ได้แสดงว่า Network ไม่มีปัญหา ลอง Loop ดูว่า Printer นั้นต้องกำหนด Port เป็นอย่างไร สำหรับการ Loop ดูตัวอย่างที่นี่ครับ http://www.mrexcel.com/forum/excel-ques ... post994246 ให้ดูประกอบกับ Comment 4 ซึ่งเป็นการเริ่ม Loop ด้วย 0 แทน 1 ครับ