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

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

คุณสามารถดาวน์โหลดสมุดงาน Excel ต่อไปนี้เพื่อความเข้าใจที่ดีขึ้นและฝึกฝนด้วยตัวเอง<3 การเพิ่มแผ่นงานด้วย Name.xlsm

รหัส VBA เพื่อเพิ่มแผ่นงานด้วยชื่อ

เราจะใช้ วัตถุแผ่นงาน เพื่อเพิ่ม แผ่นงานใน Excel รหัส VBA พื้นฐานสำหรับเพิ่มแผ่นงานที่มีชื่อมีลักษณะเหมือนกับด้านล่าง

ก่อน: เป็นตัวเลือก มันเพิ่มแผ่นงานใหม่ก่อนแผ่นงานใดแผ่นหนึ่ง

หลัง: ไม่บังคับเช่นกัน เพิ่มแผ่นงานใหม่หลังจากแผ่นงานที่ระบุ

นับ: นอกจากนี้ยังเป็นพารามิเตอร์ที่ไม่บังคับ ระบุจำนวนแผ่นงานที่จะเพิ่ม

ประเภท: เป็นตัวเลือกเช่นกัน เป็นการระบุประเภทของแผ่นงาน ที่นี่ ค่าเริ่มต้นคือ xlWorksheet .

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

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

เรามีเวิร์กชีตชื่อ รายงานการขาย ประกอบด้วย ยอดขายรายวันรายงาน ของโรงอาหารบางแห่ง ในคอลัมน์ B , C และ D มีชื่อของ ตัวแทนขาย , สินค้า และ ปริมาณ ตามลำดับ

ที่นี่ เราจะเพิ่มแผ่นงานอื่นๆ ในสมุดงานนี้โดยใช้ แมโคร VBA .

ที่นี่เราใช้เวอร์ชัน Microsoft Excel 365 คุณสามารถใช้เวอร์ชันอื่นตามความสะดวกของคุณ

1. การเพิ่ม Sheet พร้อมชื่อใน Excel VBA

ในวิธีแรก เราจะเพิ่มแผ่นงานที่มีชื่อจาก การป้อนข้อมูลของผู้ใช้ หากคุณสงสัยที่จะเรียนรู้ ให้ทำตามขั้นตอนง่ายๆ เหล่านี้

📌 ขั้นตอน:

• ในตอนเริ่มต้น ให้ไปที่ นักพัฒนาซอฟต์แวร์ แท็บ
• อย่างที่สอง เลือก Visual Basic ในกลุ่ม โค้ด
• อีกทางหนึ่ง กด ALT + F11 เพื่อทำงานเดียวกัน

หมายเหตุ: อย่าลืมกด ปุ่ม ALT ทางด้านซ้ายของ SPACEBAR การดำเนินการจะไม่ดำเนินการหากคุณใช้คีย์ ALT อื่น

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

• ปัจจุบัน เปิดโค้ด โมดูล .
• หลังจากนั้น เขียนโค้ดต่อไปนี้ใน โมดูล

4256

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

• ประการแรก เราเรียกขั้นตอนย่อยว่า Add_Sheet_with_Name .
• จากนั้น เรากำหนดประเภทของตัวแปร
• หลังจากนั้น เราเพิ่มคำสั่ง เมื่อเกิดข้อผิดพลาด Resume Next การดำเนินการนี้จะละเว้นข้อผิดพลาดใดๆ
• หลังจากนั้น เราใช้ InputBox เพื่อรับชื่อแผ่นงานจากผู้ใช้ นอกจากนี้ เรายังเก็บสตริงข้อความจาก InputBox ไว้ในตัวแปร sheet_name ด้วย
• ถัดไป ถ้า sheet_name ว่างเปล่า ดังนั้นโค้ด จะไม่ดำเนินการ
• สุดท้าย เรากำลังใช้ Add.Name วิธีการตั้งชื่อแผ่นงานที่สร้างขึ้นใหม่ ที่นี่ ชื่อจะเหมือนกับตัวแปร sheet_name

• ในขณะนี้ กดปุ่ม เรียกใช้ (⏵) ไอคอน แต่คุณสามารถกด F5 บนแป้นพิมพ์

• ทันใดนั้น กล่องป้อนข้อมูลจะเปิดขึ้น
• ที่นี่ ป้อนชื่อของแผ่นงานใหม่ ในกรณีนี้ เราเขียน กำไร ในช่อง
• หลังจากนั้น คลิก ตกลง .

• ดังนั้น โค้ดของเราจะดำเนินการ และจะเพิ่มชีตชื่อ กำไร

หมายเหตุ: เรายังไม่ได้กล่าวถึงสถานที่ใดในชีตของเรา โดยค่าเริ่มต้น จะถูกวางไว้ก่อนแผ่นงานที่ใช้งานอยู่

อ่านเพิ่มเติม: Excel VBA เพื่อเพิ่มแผ่นงานไปยังสมุดงานอื่น (3 ตัวอย่างที่มีประโยชน์)

2. การใช้ Excel VBA เพื่อเพิ่มแผ่นงานที่มีชื่อก่อนแผ่นงานเฉพาะ

ในวิธีที่สอง เราจะเพิ่มแผ่นงานที่มีชื่อก่อนแผ่นงานเฉพาะ มาสำรวจกระบวนการทีละขั้นตอนกันขั้นตอน

📌 ขั้นตอน:

• ขั้นแรก ให้เปิดหน้าต่างโค้ด โมดูล ตามที่แสดงใน วิธีที่ 1 .
• อย่างที่สอง เขียนโค้ดต่อไปนี้ลงไป

5916

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

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

• หลังจากนั้น รันโค้ดตามที่แสดงใน เมธอด 1 .
• ดังนั้นจึงเพิ่มแผ่นงานใหม่ งบดุล ก่อนแผ่นงานที่ชื่อว่า กำไร .

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

3. การใช้ Excel VBA เพื่อเพิ่มแผ่นงาน ด้วยชื่อหลังแผ่นงานเฉพาะ

ในวิธีนี้ เราจะเพิ่มแผ่นงานหลังแผ่นงานที่ชื่อว่า กำไร มาดูขั้นตอนโดยละเอียดกัน

📌 ขั้นตอน:

• ในตอนแรก ให้นำโค้ด โมดูล ดังแสดงใน วิธีที่ 1 .
• หลังจากนั้น เขียนโค้ดต่อไปนี้ลงไป

8893

โค้ดนี้เกือบจะเหมือนกับโค้ดของ วิธีที่ 2 . ในที่นี้เราใช้พารามิเตอร์ หลังจาก แทนกว่า ก่อน เนื่องจากเราต้องการเพิ่มชีตใหม่ต่อจากชีตใดชีตหนึ่ง

• หลังจากนั้น ให้รันโค้ดตามที่แสดงใน วิธีที่ 1 .<15
• ด้วยเหตุนี้ ระบบจะเพิ่มแผ่นงานใหม่ คลังสินค้า หลังแผ่นงานชื่อ กำไร

อ่านเพิ่มเติม: Excel VBA เพื่อเพิ่มแผ่นงานหากไม่มีอยู่ (พร้อมขั้นตอนด่วน)

4. การแทรกแผ่นงานด้วยชื่อที่จุดเริ่มต้นของสมุดงาน

ในส่วนนี้ เราจะแทรกแผ่นงานใหม่ที่จุดเริ่มต้นของสมุดงานใน Excel โดยใช้ VBA ดังนั้นอย่ารอช้า เรามาดูกันดีกว่าว่าทำอย่างไร

📌 ขั้นตอน:

• เริ่มแรก นำโค้ด โมดูล หน้าต่างตามที่แสดงใน วิธีที่ 1 .
• หลังจากนั้น ให้เขียนโค้ดต่อไปนี้ลงไป

6784

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

• จากนั้น รันโค้ดตามที่แสดงใน วิธีที่ 1
• ด้วยเหตุนี้ ระบบจะเพิ่มแผ่นงานใหม่ โปรไฟล์บริษัท ที่จุดเริ่มต้นของสมุดงาน

อ่านเพิ่มเติม: มาโคร Excel: สร้างชีตใหม่และเปลี่ยนชื่อ (3 ตัวอย่างในอุดมคติ)

5. การใช้ Excel VBA เพื่อเพิ่มชีตที่ส่วนท้ายของสมุดงาน

ในส่วนนี้ เราจะ เพิ่มแผ่นงานหลังจากแผ่นงานสุดท้ายของสมุดงาน ให้ฉันสาธิตกระบวนการด้านล่างนี้

📌 ขั้นตอน:

• ในเบื้องต้น ให้เปิดหน้าต่างรหัส โมดูล ตามที่แสดงใน วิธีที่ 1 .
• อย่างที่สอง วางโค้ดต่อไปนี้ลงในนั้น

8695

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

• ประการแรก เราเรียกขั้นตอนย่อยว่า Sheet_End_Workbook
• ลำดับต่อไป เราจะใช้เมธอด Add.Name เพื่อตั้งชื่อแผ่นงานที่สร้างขึ้นใหม่ เราจะสร้างแผ่นงานนี้หลังจากแผ่นงานสุดท้ายของสมุดงาน เราสามารถรับหมายเลขแผ่นสุดท้ายได้จากคุณสมบัติ Sheets.Count นอกจากนี้ เราได้ตั้งชื่อชีต Income Statement .

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

อ่านเพิ่มเติม: สร้างสมุดงานใหม่และบันทึกโดยใช้ VBA ใน Excel

6. แนะนำแผ่นงานหลายแผ่นโดยใช้ค่าเซลล์โดย Excel VBA

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

📌 ขั้นตอน:

• ตอนแรก เปิดรหัส หน้าต่างโมดูล ตามที่แสดงใน วิธีที่ 1 .
• หลังจากนั้น ให้คัดลอกโค้ดต่อไปนี้และวางลงในโค้ดนั้น

2970

• ประการแรก เราเรียกหน่วยย่อยขั้นตอนเป็น Add_Multiple_Sheets_Using_Cell_Value
• จากนั้น เรากำหนดประเภทตัวแปร
• หลังจากนั้น เราใช้ InputBox เพื่อรับช่วงข้อมูลจากผู้ใช้
• ประการที่สี่ เราเปิดใช้งานแผ่นงาน รายงานการขาย .
• ต่อมา เราใช้ลูป สำหรับแต่ละถัดไป เพื่อผ่านช่วงเซลล์ที่เลือกทีละเซลล์<15
• ต่อไป เราจะใช้เมธอด Add.Name เพื่อตั้งชื่อแผ่นงานที่สร้างขึ้นใหม่ เราจะสร้างแผ่นงานเหล่านี้ต่อจากแผ่นงานที่ทำงานอยู่ รายงานการขาย ของสมุดงาน

• ตอนนี้ ให้รันโค้ดตามที่แสดงใน วิธีที่ 1 .
• ทันที กล่องใส่ Exceldemy จะเปิดขึ้น
• จากนั้น ให้เซลล์ใน B5:B9 ช่วงในช่อง
• สุดท้าย คลิก ตกลง .

• สุดท้าย จะแทรก ห้า แผ่นงาน ตั้งชื่อตามค่าเซลล์ในช่วง B5:B9 ทั้งหมดอยู่หลังชีต รายงานการขาย .

บทสรุป

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