การ List รายชื่อ Sheet
เนื่องจากมีคำถามเกี่ยวกับวิธีการ List รายชื่อ Sheet ค่อนข้างบ่อย และ Pantip เองก็มีการลบกระทู้ค่อนข้างบ่อย ผมก็เลยต้องตอบคำถามเดิม ๆ ค่อนข้างบ่อยเป็นลูกโซ่  เลยนำมาเขียนไว้ที่นี่เพื่อจะได้ใช้อ้างอิง ไม่ต้องเขียนใหม่ หรือ Copy มาแปะทุกครั้งที่เจอคำถาม
สำหรับวิธีการนี้ใช้ Excel 4 Macro Function มาช่วย ซึ่งต้องกำหนด Security ในเมนู Tools > Macro > Security เป็นระดับ Medium หรือ Low ถึงจะใช้ได้
วิธีการทำดังนี้ครับ
- เปิดไฟล์ที่ต้องการ List รายชื่อ Sheet โดยทำการเพิ่ม 1 Sheet คือ Sheet ที่ต้องการให้แสดงรายชื่อ Sheet ทั้งหมด
- เข้าเมนู Insert > Name > Define >
2.1 ช่อง Names in workbook: คีย์ CountSheet > ช่อง Refers to: คีย์ =Get.Workbook(4) > Add
2.2 ช่อง Names in workbook: คีย์ ListSheet > ช่อง Refers to: คีย์
=RIGHT(GET.WORKBOOK(1),LEN(GET.WORKBOOK(1))-FIND("]",GET.WORKBOOK(1))) > OK
- ใน Sheet ที่เพิ่มเข้ามาใหม่
3.1 เซล A1 คีย์
=CountSheet
Enter
3.2 เซล A2 คีย์
=IF(ROWS($A$2:A2)<=$A$1,INDEX(ListSheet,ROWS($A$2:A2)),"")
Enter แล้ว Copy ลงด้านล่าง
| Create Date : 07 มิถุนายน 2551 |
| Last Update : 1 มีนาคม 2556 21:45:51 น. |
|
2 comments
|
| Counter : 4602 Pageviews. |
 |
|
|
| โดย: Ugly Girl IP: 192.168.0.153, 192.168.0.153, 127.0.0.1, 58.137.112.250 วันที่: 1 มีนาคม 2555 เวลา:15:02:44 น. |
|
|
|
โดย: คนควน  วันที่: 4 มีนาคม 2555 เวลา:17:18:55 น. |
|
|
|
|
|
เลยนำมาเขียนไว้ที่นี่เพื่อจะได้ใช้อ้างอิง ไม่ต้องเขียนใหม่ หรือ Copy มาแปะทุกครั้งที่เจอคำถาม
การทำเช่นนั้นคงต้องอาศัย VBA เข้ามาจัดการครับ
ฝากข้อความหลังไมค์
Rss Feed
ผู้ติดตามบล็อก : 27 คน [
รบกวนถามหน่อยน่ะค่ะ ในทางกลับกัน ถ้าต้องการตั้งชื่อ sheet ตาม list ที่เรามี แล้วเวลาเราเพิ่ม sheet ใหม่ให้ชื่อของ sheet นั้นๆ เปลี่ยนตามใน list ที่เรามีได้มั้ยค่ะ
ขอบคุณล่วงหน้าค่ะ