จะพิมพ์เฉพาะหน้าสุดท้ายของแผ่นงานใน Excel ได้อย่างไร?

ในหลาย ๆ กรณีคุณอาจต้องพิมพ์หน้าสุดท้ายของเวิร์กชีตใน Excel ต้องทำอย่างไร? บทความนี้มีวิธีแก้ปัญหาเพื่อให้บรรลุ

พิมพ์หน้าสุดท้ายของแผ่นงานด้วยรหัส VBA เท่านั้น

พิมพ์หน้าสุดท้ายของแผ่นงานด้วยรหัส VBA เท่านั้น

คุณสามารถเรียกใช้รหัส VBA ต่อไปนี้เพื่อพิมพ์เฉพาะหน้าสุดท้ายของแผ่นงานใน Excel กรุณาดำเนินการดังนี้

1. เปิดแผ่นงานที่คุณต้องการพิมพ์หน้าสุดท้ายจากนั้นกด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. ในหน้าต่าง Microsoft Visual Basic for Applications คลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่างโมดูล

รหัส VBA: พิมพ์เฉพาะหน้าสุดท้ายของแผ่นงาน

Sub PrintLastPage()
Dim xPages As Long
xPages = ActiveSheet.PageSetup.Pages.Count
If xPages > 0 Then ActiveSheet.PrintOut from:=xPages, to:=xPages, preview:=True
End Sub

3 กด F5 เพื่อเรียกใช้รหัสจากนั้นหน้าสุดท้ายของแผ่นงานปัจจุบันจะปรากฏในกล่องโต้ตอบตัวอย่างก่อนพิมพ์ที่เปิดขึ้น กรุณาคลิกที่ไฟล์ พิมพ์ เพื่อเริ่มการพิมพ์ ดูภาพหน้าจอ: