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

Excel VBA: เพิ่มแผ่นงานหากไม่มีอยู่ (มุมมองด่วน)

8770

แทรกลงในโมดูลใหม่เพื่อใช้โค้ดด้านบน

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

คุณสามารถดาวน์โหลดแบบฝึกหัดของเราได้จากที่นี่ฟรี!

ขั้นตอนในการนำรหัส VBA ไปใช้เพื่อเพิ่มแผ่นงานใน Excel ถ้าไม่มีอยู่

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

📌 ขั้นตอนที่ 1: แทรกโมดูลใหม่

ก่อนอื่น คุณต้องแทรก โมดูลสำหรับเขียนโค้ด VBA

• ในตอนเริ่มต้น ให้ไปที่แท็บ นักพัฒนาซอฟต์แวร์ >> เครื่องมือ Visual Basic

• ด้วยเหตุนี้ Microsoft Visualหน้าต่าง Basic for Applications จะปรากฏขึ้น
• จากนั้น ไปที่แท็บ แทรก >> โมดูล เครื่องมือ

ด้วยเหตุนี้ โมดูลใหม่ชื่อ โมดูล 1 จึงถูกสร้างขึ้น

อ่านเพิ่มเติม: วิธีเพิ่มแผ่นงานด้วย ชื่อใน Excel VBA (6 วิธีง่ายๆ)

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

• สร้างสมุดงานใหม่และบันทึกโดยใช้ VBA ใน Excel
• Excel VBA: สร้างสมุดงานใหม่และตั้งชื่อ (6 ตัวอย่าง)
• วิธีสร้างแผ่นงานใหม่จากเทมเพลตโดยใช้มาโครใน Excel

📌 ขั้นตอนที่ 2: เขียนและบันทึกโค้ด VBA ที่จำเป็น

ตอนนี้ คุณต้องเขียนโค้ดภายในโมดูลและบันทึก

• ใน ในการทำเช่นนี้ ให้คลิกที่ตัวเลือก Module1 และเขียนโค้ดต่อไปนี้ในหน้าต่างโค้ด

80546312

• ในฐานะ ผลลัพธ์ หน้าต่างโค้ดจะมีลักษณะดังนี้

🔎 คำอธิบายโค้ด:

♣ ส่วนที่ 1:

9617

ในส่วนนี้ เราได้ประกาศชื่อมาโครและตัวแปร nam es.

♣ ส่วนที่ 2:

9616

ในส่วนนี้ เราได้สร้างช่องป้อนข้อมูล เราสามารถป้อนชื่อไฟล์ที่ต้องการค้นหาผ่านช่องอินพุตนี้

♣ ส่วนที่ 3:

1207

ในส่วนนี้ เราจะตรวจสอบว่ามีแผ่นงานที่จำเป็นอยู่ในสมุดงานหรือไม่ ถ้าไม่ มันจะสร้างแผ่นงานที่จำเป็นและแสดงข้อความเกี่ยวกับการเปลี่ยนแปลงนี้

♣ ส่วนที่ 4:

8852

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

• หลังจากนั้น กด Ctrl + S

• จากนั้น หน้าต่าง Microsoft Excel จะปรากฏขึ้น คลิกที่ปุ่ม ไม่

• ดังนั้น หน้าต่าง บันทึกเป็น จะปรากฏขึ้น
• ต่อไปนี้ เลือกตัวเลือก บันทึกเป็นประเภท: เป็นรูปแบบ .xlsm จากนั้น คลิกที่ปุ่ม บันทึก

ดังนั้น คุณได้เขียนและบันทึกโค้ดที่ต้องการแล้ว

หมายเหตุ:

คุณต้องบันทึกสมุดงาน Excel ในรูปแบบ .xlsm มิฉะนั้น แมโครจะไม่ถูกเปิดใช้งานและรหัสจะไม่ทำงาน

อ่านเพิ่มเติม: Excel VBA เพื่อเพิ่มแผ่นงานด้วยชื่อตัวแปร (5 ตัวอย่างในอุดมคติ)

📌 ขั้นตอนที่ 3: เรียกใช้โค้ด

ตอนนี้ คุณต้องเรียกใช้โค้ดและตรวจสอบผลลัพธ์

• ในการดำเนินการ ก่อนอื่นให้คลิก บนไอคอน เรียกใช้ ในหน้าต่าง Microsoft Visual Basic for Applications

• ด้วยเหตุนี้ หน้าต่าง มาโคร จะปรากฏขึ้น
• จากนั้น เลือกมาโคร AddSheetIfNotExist และคลิกที่ปุ่ม เรียกใช้

• ขณะนี้ กล่องข้อความที่เราสร้างขึ้นชื่อ เพิ่มแผ่นงานหากไม่มีอยู่ จะปรากฏขึ้น ที่นี่ ตัวเลือกอัตโนมัติจะเป็น Sheet5 .

• ตอนนี้ สำหรับการตรวจสอบ ให้เขียน “เมษายน” ในกล่องข้อความและคลิกที่ปุ่ม ตกลง

• จากนั้นคุณจะเห็นข้อความอื่น กล่องจะปรากฏขึ้นเพื่อแจ้งให้คุณทราบว่ามีแผ่นงานอยู่แล้ว
• คลิกที่ปุ่ม ตกลง

• หลังจากนั้น ให้รันโค้ดอีกครั้งและเขียน “พฤษภาคม” ในกล่องข้อความของกล่องข้อความที่สร้างขึ้น จากนั้น คลิกที่ปุ่ม ตกลง

• ดังนั้น คุณจะเห็นกล่องข้อความอื่นที่จะ ปรากฏขึ้นเพื่อแจ้งให้คุณทราบว่าแผ่นงาน “พฤษภาคม” ไม่มีอยู่ ดังนั้นจึงสร้างแผ่นงานนี้ขึ้น
• ตามด้วยคลิกที่ปุ่ม ตกลง

สุดท้าย คุณจะเห็นว่าคุณได้เพิ่มแผ่นงานที่ไม่เคยมีมาก่อน และตอนนี้สมุดงานจะมีลักษณะดังนี้

อ่านเพิ่มเติม: Excel VBA: เพิ่มแผ่นงานหลังจากสุดท้าย (3 ตัวอย่างในอุดมคติ)

สรุป

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

และเยี่ยมชม ExcelWIKI สำหรับสิ่งอื่นๆ อีกมากมายบทความเช่นนี้ ขอบคุณ!