/ / สร้างส่วนท้ายก่อนที่จะพิมพ์ใน Excel VBA

สร้างส่วนท้ายก่อนพิมพ์ใน Excel VBA

ด้านล่างเราจะดูที่โปรแกรมมา Excel VBA ที่ สร้างส่วนท้ายก่อนพิมพ์ สมุดงาน

สร้างสมุดงาน BeforePrint เหตุการณ์ รหัสที่เพิ่มลงในสมุดงาน BeforePrint เหตุการณ์จะถูกดำเนินการโดย Excel VBA ก่อนที่คุณจะพิมพ์สมุดงาน

1. เปิดตัวแก้ไข Visual Basic

2. ดับเบิลคลิกที่เวิร์กบุคนี้ใน Project Explorer

3. เลือกสมุดงานจากลิสต์แบบดรอปดาวน์ด้านซ้าย เลือก BeforePrint จากรายการแบบเลื่อนลงด้านขวา

สมุดงาน BeforePrint เหตุการณ์ใน Excel VBA

4. ในการสร้างส่วนท้ายให้เพิ่มโค้ดต่อไปนี้ลงใน Workbook BeforePrint Event:

ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName

หมายเหตุ: ออบเจ็กต์ PageSetup มีแอตทริบิวต์การตั้งค่าเพจทั้งหมด (ส่วนท้ายด้านซ้ายขอบด้านล่างขนาดกระดาษขอบด้านซ้ายเป็นต้น) เป็นสมบัติ

5. ทดสอบโปรแกรมด้วยการพิมพ์สมุดงานของคุณ

ผล:

ฟุตบอล

อ่านเพิ่มเติมได้ที่: