Snasui Excel Forum

Posted: **Wed Apr 10, 2013 10:48 am**

ผมได้ศึกษาการปริ้นงาน แบบทั้งหมดจาก ที่นี่ http://www.cleverdrive.net/384/excel-ma ... ting-slip/

แต่ปัญหาคือ Code VBA ในกระทู้ดังกล่าว จะสั่ง พิมพ์จาก งานที่ 1 2 3 4 ไปเรื่อย ๆ ตามที่เรากำหนด Start > Finish
http://www.cleverdrive.net/wp-content/u ... 5CHGNY.png

คำถามก็คือ ***
ถ้าผมต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่นที่ 1 ทำยังไงครับ เช่น
ให้เริ่มปริ้นจากแผ่นที่ 100 ลงมา 99 98 97 ... 1 แบบนี้ครับ

ปล.วิธีแก้ปัญหาดังกล่าวนี้ผมไว้ค้นหาในอินเทอร์เน็ตมาหลายวันแล้วครับ ไม่มีคำตอบที่จะนำมาประยุกต์ได้เลย จึงต้องขอรบกวนอาจารย์แล้วหละครับ

ขอบคุณล่วงหน้าด้วยนะครับอาจารย์...

Posted: **Wed Apr 10, 2013 10:54 am**

ให้แนบไฟล์ที่ลองทำแล้ว แจ้ง Procedure ที่ติดปัญหามาพร้อมคำอธิบายด้วยครับ

หากต้องการแนบภาพ ให้แนบในฟอรัมนี้ได้เลย

Posted: **Wed Apr 10, 2013 11:42 am**

จากตัวอย่าง Code ที่แนบมา ลองปรับเป็นตามด้านล่างครับ

Code: Select all

Sub Button1_Click()
    Start = Range("Start")
    Finish = Range("Finish")
    
    For i = Finish To Start Step -1
        Range("No") = i
        Calculate
        ActiveSheet.PrintOut
    Next i
    MsgBox "Completed!", vbOKOnly, "Print Routine Slip"
End Sub

Posted: **Wed Apr 10, 2013 12:09 pm**

สุดยอดไปเลยได้แล้วครับ ท่านอาจารย์

Snasui Excel Forum

ต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่น 1

ต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่น 1

Re: ต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่น

Re: ต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่น

Re: ต้องการให้เริ่มปริ้นงานจาก แผ่นสุดท้ายก่อน ลงมาจนถึงแผ่น