หากเราสามารถตั้งค่าปุ่มพิมพ์แบบกำหนดเองในเวิร์กชีต Excel ของเราได้ ก็จะเป็นมิตรกับผู้ใช้มากและประหยัดเวลาในการพิมพ์ชีต ด้วยการใช้ VBA Macros เราสามารถทำได้โดยง่าย ดังนั้น บทความนี้จะให้มาโครง่ายๆ 5 แบบแก่คุณเพื่อใช้โค้ด VBA สำหรับปุ่มพิมพ์ใน Excel

ดาวน์โหลดสมุดงานแบบฝึกหัด

คุณสามารถ ดาวน์โหลดเทมเพลต Excel ฟรีจากที่นี่และฝึกฝนด้วยตัวเอง

5 ตัวอย่างการใช้ VBA โค้ดสำหรับปุ่มพิมพ์ใน Excel

เรามาทำความรู้จักกับชุดข้อมูลของเรากันก่อน ซึ่งแสดงถึง การขาย ของพนักงานขายบางส่วนใน ภูมิภาคต่างๆ

1. ใช้โค้ด VBA เพื่อสร้างปุ่มพิมพ์สำหรับกล่องโต้ตอบการพิมพ์ใน Excel

ก่อนอื่น เราจะสร้าง ปุ่มพิมพ์ จากนั้นจะเขียนโค้ดสำหรับปุ่มนั้น

• คลิก ดังนี้: นักพัฒนาซอฟต์แวร์ >> แทรก >> กล่องปุ่ม

หลังจากนั้นไม่นาน คุณจะเห็น เครื่องหมายบวก (+) ใน เคอร์เซอร์

• ลาก ที่ เคอร์เซอร์ ตามขนาดปุ่ม ที่คุณต้องการ และหลังจากนั้นสักครู่ กล่องโต้ตอบ ชื่อ กำหนดมาโคร จะเปิดขึ้น

• ระบุ ชื่อ และ กด New .

A VBA หน้าต่างจะปรากฏขึ้น

• จากนั้นพิมพ์ รหัสต่อไปนี้ในนั้น-

2373

• ตอนนี้ กลับไปที่ แผ่นงาน .

รายละเอียดรหัส

• ที่นี่ ฉันสร้างขั้นตอน Sub , DialogBox .
• จากนั้นใช้ Dialogs (xlDialogPrint).Show เพื่อเปิด พิมพ์กล่องโต้ตอบ .

สร้างปุ่มแล้ว

• คลิกขวา บนปุ่ม ปุ่ม และเลือก แก้ไขข้อความ จาก เมนูบริบท เพื่อเปลี่ยนชื่อปุ่ม

• หลังจากนั้น เพียง พิมพ์ ชื่อ และ คลิก เมาส์ ของคุณ ที่ใดก็ได้ นอกปุ่ม

จากนั้นเพียงแค่กดปุ่ม ปุ่ม .

จากนั้น คุณจะได้รับ กล่องโต้ตอบการพิมพ์ หากคุณต้องการ คุณสามารถ พิมพ์ ได้เลย

หากคุณไม่มี เครื่องพิมพ์ ในขณะนี้ คุณสามารถ บันทึก เป็น ไฟล์ PDF . สำหรับการใช้งานเพิ่มเติมหรือเพื่อ พิมพ์ ในภายหลัง

• ตอนนี้กด ตกลง .

• ในขณะนี้ เพียงแค่ป้อน ชื่อ แล้วกด บันทึก

นี่คือสิ่งที่พิมพ์ออกมา PDF .

อ่านเพิ่มเติม: วิธีปรับการตั้งค่าการพิมพ์ใน Excel (8 เคล็ดลับที่เหมาะสม)

2. ใช้รหัส VBA เพื่อสร้างปุ่มพิมพ์สำหรับ Active Sheet

ที่นี่ เราจะใช้ VBA เพื่อ พิมพ์ และ ใช้งานอยู่ ชีต .

ขั้นตอน:

• ทำตาม สองขั้นตอนแรกจากส่วนแรก เพื่อสร้าง ปุ่ม และ กำหนดมาโคร .
• เขียน ชื่อมาโคร แล้วกด ใหม่ .

หลังจากนั้นไม่นาน หน้าต่าง VBA จะเปิดขึ้น

• จากนั้น เขียน รหัส ต่อไปนี้ ในนั้น-

1634

• หลังจากนั้น ย้อนกลับ ไปยัง

รายละเอียดรหัส

• ที่นี่ ฉันสร้างขั้นตอน ย่อย , ActiveSheet .
• จากนั้นใช้ PrintOut เพื่อ เลือก แผ่นงานที่ใช้งานอยู่ และ พิมพ์ มัน .

• ตอนนี้ เพียง กด ปุ่ม ปุ่ม .

A กล่องโต้ตอบ ชื่อ บันทึกผลงานพิมพ์เป็น จะเปิดขึ้น

• ระบุ ชื่อ แล้วกด บันทึก .

จากนั้นคุณจะได้รับ PDF ที่พิมพ์ออกมา

คุณสามารถ เปลี่ยน เครื่องพิมพ์ ได้อย่างง่ายดาย หากคุณต้องการ

• คลิก บน ไฟล์ ข้าง หน้าแรก

• จากนั้นเลือกตัวเลือก พิมพ์ และ คลิก ใน แบบเลื่อนลง เพื่อเลือก a เครื่องพิมพ์ .

อ่านเพิ่มเติม: วิธีพิมพ์ชีตทั้งหมดใน Excel (3 วิธี)

3. ใช้รหัส VBA เพื่อสร้างปุ่มพิมพ์สำหรับแผ่นงานที่เลือกใน Excel

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

ขั้นตอน:

• ทำตาม สองขั้นตอนแรกจากส่วนแรก เพื่อสร้าง ปุ่ม และ กำหนด a มาโคร .
• จากนั้นเขียน ชื่อมาโคร และกด ใหม่ .

หลังจากนั้นไม่นานหน้าต่าง VBA จะเปิดขึ้น

• หลังจากนั้น พิมพ์ รหัส ต่อไปนี้ ในนั้น-

1324

จากนั้น ย้อนกลับ ไปที่ แผ่นงาน ของคุณ

รายละเอียดรหัส<2

• ที่นี่ ฉันสร้างขั้นตอน ย่อย , แผ่นที่เลือก .
• จากนั้นใช้ ActiveWindow เป็น เลือกแผ่นงาน จากหน้าต่าง ที่ใช้งาน Excel .
• ถัดไป ใช้ PrintOut เพื่อพิมพ์ หลายรายการ ที่เลือก แผ่นงาน .

• ตอนนี้ เลือกแผ่นงาน แล้วกดปุ่ม ปุ่มพิมพ์ ฉันเลือกสองแผ่น

• ระบุ ชื่อ สำหรับ PDF แล้วกด บันทึก .

ไฟล์ PDF มี t สองหน้า สำหรับ สองแผ่น .

อ่านเพิ่มเติม: วิธีพิมพ์ชีตเฉพาะโดยใช้มาโคร VBA ใน Excel (4 วิธี)

การอ่านที่คล้ายกัน:

• วิธีพิมพ์แผ่นงาน Excel ขนาด A4 (4 วิธี)
• วิธีเก็บ ส่วนหัวใน Excel เมื่อพิมพ์ (3 วิธี)
• Excel VBA: วิธีตั้งค่าพื้นที่พิมพ์แบบไดนามิก (7 วิธี)
• วิธีพิมพ์ Excel แผ่นงานพร้อมเส้น (3 วิธีง่ายๆ)
• วิธีพิมพ์กราฟใน Excel (5 วิธี)

4. ฝัง Excel VBA เพื่อสร้างปุ่มพิมพ์สำหรับแผ่นงานเฉพาะที่มีช่วงที่เลือก

ที่นี่ เราจะสร้าง ปุ่มพิมพ์ เป็น พิมพ์ a เลือก ช่วง จาก แผ่นงานเฉพาะ .

ขั้นตอน:

• ทำตาม อันดับแรกสองขั้นตอนจากส่วนแรก เพื่อสร้าง ปุ่ม และกำหนดมาโคร
• เขียน ชื่อมาโคร แล้วกด ใหม่ .

หลังจากนั้นไม่นาน หน้าต่าง VBA จะเปิดขึ้น

• จากนั้น เขียน รหัส –

5200

• ต่อไปนี้ กลับไปที่ชีตของคุณ

รายละเอียดโค้ด

• ที่นี่ ฉันได้สร้าง ย่อย ขั้นตอน SpecificSheetnRange .
• จากนั้นใช้ ด้วย คำสั่ง เพื่อ เลือก a เฉพาะ
• ถัดไป PrintArea = “B2:D11”.PrintOut จะ เลือก ช่วง จาก แผ่นงานเฉพาะ และจะ พิมพ์ มัน

• ตอนนี้เพียงแค่ กด ปุ่ม พิมพ์ .

• ตั้งค่า ชื่อ สำหรับ PDF แล้วกด บันทึก .

เป็น พิมพ์ แผ่นงานเฉพาะ

อ่านเพิ่มเติม: Excel VBA: ตั้งค่าพื้นที่พิมพ์สำหรับหลายช่วง (5 ตัวอย่าง)

5. ฝัง Excel VBA เพื่อสร้างปุ่มพิมพ์สำหรับแผ่นงานที่มีช่วงที่เลือก

นอกจากนี้ คุณยังสามารถ เลือกช่วง จาก แผ่นงานที่ใช้งานอยู่ และสามารถสร้าง ปุ่มพิมพ์ ถึง พิมพ์ โดยใช้ VBA .

ขั้นตอน:

• ทำตาม สองขั้นตอนแรกจากส่วนแรก เพื่อสร้าง ปุ่ม และกำหนด มาโคร
• หลังจากนั้น ให้เขียน ชื่อมาโคร และกด ใหม่ .

หลังจากนั้นไม่นาน VBA หน้าต่างจะเปิดขึ้น

• ในหน้าต่าง VBA ให้ เขียน รหัส ต่อไปนี้ –

8724

• จากนั้น ย้อนกลับ ไปที่ แผ่นงาน ของคุณ

• ที่นี่ ฉันสร้าง ย่อย ขั้นตอน ActiveSheetnRange .
• จากนั้นใช้ ช่วง(“B2:D11”).พิมพ์ออก ถึง เลือก a ช่วง และ พิมพ์

• กด ปุ่มพิมพ์ .

• ระบุ ชื่อ แล้วกด บันทึก .

จากนั้นคุณจะได้รับ ช่วงที่พิมพ์ .

อ่านเพิ่มเติม: ปุ่ม Excel สำหรับพิมพ์แผ่นงานเฉพาะ (ด้วยขั้นตอนง่ายๆ)

บทสรุป

ฉันหวังว่าขั้นตอนที่อธิบายไว้ข้างต้น จะดีพอที่จะใช้โค้ด VBA สำหรับ ปุ่มพิมพ์ ใน Excel อย่าลังเลที่จะถามคำถามใด ๆ ในส่วนความคิดเห็นและโปรดให้ข้อเสนอแนะ