จะเปิดเวิร์กชีตโดยเลือกชื่อในกล่องคอมโบใน Excel ได้อย่างไร?
สมมติว่าคุณมีกล่องคอมโบในเวิร์กบุ๊ก Excel ของคุณซึ่งมีรายชื่อแผ่นงานทั้งหมด คุณต้องการเปิดเวิร์กชีตเฉพาะโดยเลือกชื่อจากกล่องคอมโบ คู่มือนี้จะสาธิตวิธีการดำเนินการนี้โดยใช้โค้ด VBA พร้อมขั้นตอนในการใส่ชื่อแผ่นงานลงในกล่องคอมโบและเปิดใช้งานฟังก์ชันที่ต้องการ
เปิดเวิร์กชีตโดยเลือกชื่อในกล่องคอมโบด้วยโค้ด VBA
เปิดเวิร์กชีตโดยเลือกชื่อในกล่องคอมโบด้วยโค้ด VBA
โค้ด VBA ด้านล่างนี้สามารถช่วยให้คุณไปที่แผ่นงานเฉพาะตามการเลือก Combo Box ใน Excel กรุณาดำเนินการดังนี้
หมายเหตุ:หากกล่องคอมโบไม่มีชื่อชีตใดๆ ในเวิร์กชีตของคุณ โปรดทำตามคำแนะนำด้านล่างเพื่อเพิ่มชื่อชีตทั้งหมดลงในกล่องคอมโบอย่างรวดเร็ว หากมีกล่องคอมโบที่มีชื่อชีตทั้งหมดอยู่แล้ว ให้ดำเนินการโดยตรง ขั้นตอนที่ 1.
ปลาย: แทรกปุ่มคำสั่ง 1 ในแผ่นงานของคุณคลิกขวาแล้วเลือก ดูรหัส จากเมนูคลิกขวา จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในไฟล์ รหัส หน้าต่างแล้วกด อื่น ๆ + Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. คลิกปุ่มคำสั่งที่แทรกจากนั้นชื่อแผ่นงานทั้งหมดของสมุดงานปัจจุบันจะถูกเพิ่มลงใน ComboBox1 โดยอัตโนมัติ
รหัส VBA: เพิ่มชื่อแผ่นงานทั้งหมดลงใน Combo Box ได้อย่างง่ายดาย
Private Sub CommandButton1_Click()
Me.ComboBox1.Clear
Dim strWs As String
Dim i As Integer
For i = 1 To ThisWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(i).Name
Next
End Sub
หากมี Combo Box ที่มีชื่อแผ่นงานทั้งหมดอยู่แล้วโปรดดำเนินการดังต่อไปนี้
1 เปิดเครื่อง โหมดการออกแบบ ภายใต้ ผู้พัฒนา แถบ
2. คลิกขวาที่กล่องคำสั่งผสมที่มีชื่อแผ่นงานจากนั้นคลิก ดูรหัส จากเมนูคลิกขวา
3. จากนั้น Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างปรากฏขึ้นโปรดแทนที่รหัส VBA เดิมในหน้าต่างรหัสด้วยรหัส VBA ด้านล่าง
รหัส VBA: เปิดแผ่นงานเฉพาะตามค่าที่เลือกของ Combo Box
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End Sub
หมายเหตุ: ในรหัส ComboBox1 คือชื่อของกล่องคำสั่งผสมที่มีชื่อแผ่นงาน
4 กด อื่น ๆ + Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างและปิดไฟล์ โหมดการออกแบบ ภายใต้ ผู้พัฒนา แถบ
ตอนนี้การเลือกชื่อเวิร์กชีตใดๆ ในกล่องคอมโบจะเปิดเวิร์กชีตที่สอดคล้องกันโดยอัตโนมัติ
แสดงชื่อแผ่นงานทั้งหมดของสมุดงานปัจจุบันใน Excel ได้อย่างง่ายดาย:
การใช้ดัชนีชีตในเวิร์กบุ๊กช่วยให้คุณจัดการเวิร์กชีตได้อย่างง่ายดาย กับ สร้างรายชื่อแผ่นงาน ประโยชน์ของ Kutools สำหรับ Excelคุณสามารถสร้างดัชนีชีตที่มีชื่อแผ่นงานทั้งหมดในสมุดงานปัจจุบันได้อย่างง่ายดาย หลังจากนั้นคุณสามารถเปลี่ยนไปใช้แผ่นงานบางแผ่นได้อย่างรวดเร็วโดยคลิกที่ชื่อแผ่นงานในแผ่นงานดัชนี ดูภาพหน้าจอด้านล่าง:
Kutools สำหรับ Excel - เพิ่มประสิทธิภาพ Excel ด้วยเครื่องมือที่จำเป็นกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ AI ฟรีถาวร! Get It Now
บทความที่เกี่ยวข้อง:
- วิธีคัดลอกค่า Combo Box ไปยังเซลล์ที่ใช้งานอยู่ใน Excel
- วิธีแสดงรูปแบบวันที่ในเอาต์พุตกล่องคำสั่งผสมใน Excel
- จะซ่อนหรือยกเลิกการซ่อนปุ่มคำสั่งตามค่าเซลล์ที่ระบุใน Excel ได้อย่างไร
- วิธีป้องกันหรือปิดการพิมพ์ในกล่องคำสั่งผสมใน Excel
- วิธีการแท็บออกจากกล่องคำสั่งผสมเพื่อเลือกเซลล์เฉพาะใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!