วิธีการสร้างรายงานจากแผ่นงาน Excel ด้วย VBA

เมื่อใช้ Visual Basic for Application (VBA) คุณจะพัฒนาขั้นตอน VBA ใน Excel Visual Basic Editor (VBE) ได้ เป็นสภาพแวดล้อมการพัฒนาที่ใช้งานง่าย ขั้นตอน VBA ที่พัฒนาขึ้นใน VBE จะเป็นส่วนหนึ่งของสมุดงาน คุณสามารถพัฒนาแอปพลิเคชัน VBA เพื่อสร้างรายงานใน Excel โดยอัตโนมัติ คุณต้องเปิดใช้งานมาโครก่อนจึงจะสามารถตั้งโปรแกรมด้วย VBE ได้

ขั้นตอนที่ 1

คลิก "เริ่ม" "โปรแกรมทั้งหมด" และ "Microsoft Excel" เพื่อเข้าสู่อินเทอร์เฟซ Excel คลิกริบบิ้น "นักพัฒนา" แล้วคลิกปุ่ม "ความปลอดภัยของมาโคร" ทำเครื่องหมายที่ "ปิดใช้งานมาโครทั้งหมดที่มีการแจ้งเตือน" แล้วคลิก "บันทึก" ตอนนี้คุณได้ตั้งค่ามาโครใน Excel ของคุณแล้ว

ขั้นตอนที่ 2

กด "Alt" และ "F11" พร้อมกันเพื่อเปิด VBE ดับเบิลคลิก "Sheet1" ที่บานหน้าต่างด้านขวาใน VBE เพื่อเปิดหน้าต่างโค้ด เลือก "แผ่นงาน" จากตัวเลือกดรอปดาวน์ในหน้าต่างโค้ด

ป้อนรหัสต่อไปนี้ในหน้าต่างรหัส:

รายงานการพิมพ์ย่อย()

ติ่มซำ Page_number

Dim ActiveSh เป็นเวิร์กชีต

Dim ShNameView As String

ตั้งค่า ActiveSh=ActiveSheet

สำหรับแต่ละเซลล์ในช่วง ("b3"), ช่วง ("b3") สิ้นสุด (xlDown))

Sh_view=ActiveCell.Offset (0, 1).Value

Page_number= ActiveCell.Offset (0, 1).Value

เลือก Case Cell.Value

กรณีที่ 1

ชีต (ShNameView).Select