ไปยังเนื้อหาหลัก

วิธีแทรกชื่อแผ่นงานในเซลล์ใน Excel อย่างรวดเร็ว

มีวิธีง่ายๆในการแทรกชื่อแผ่นงานปัจจุบันในเซลล์เดียวหรือไม่? จะแทรกชื่อแผ่นงานทั้งหมดในเซลล์ได้อย่างไร? บทความนี้จะนำเสนอวิธีการที่ยุ่งยากเพื่อแก้ปัญหาเหล่านี้

แทรกชื่อแผ่นงานปัจจุบันอย่างรวดเร็วในเซลล์ที่มีฟังก์ชัน

แทรกชื่อแผ่นงานทั้งหมดในเซลล์อย่างรวดเร็วด้วย VBA

แทรกชื่อแผ่นงานที่ใช้งานได้อย่างรวดเร็วด้วย Kutools for Excel ความคิดที่ดี 3

แทรกชื่อแผ่นงานทั้งหมดอย่างรวดเร็วด้วยการเชื่อมโยงหลายมิติในเซลล์เป็นดัชนี ความคิดที่ดี 3


ลูกศรสีฟ้าฟองขวา แทรกชื่อแผ่นงานปัจจุบันอย่างรวดเร็วในเซลล์ที่มีฟังก์ชัน

เพียงแค่ใส่สูตรของ = ขวา (CELL ("filename", D2), LEN (CELL ("filename", D2)) - FIND ("]", CELL ("filename", D2))) ในเซลล์ใดก็ได้แล้วกด เข้าสู่ มันแสดงชื่อแผ่นงานปัจจุบันในเซลล์
doc-insert-sheets-name-to-cells1

สูตรนี้แสดงได้เฉพาะชื่อของแผ่นงานปัจจุบันเท่านั้น แต่ไม่สามารถแสดงชื่อของแผ่นงานอื่นได้


ลูกศรสีฟ้าฟองขวา แทรกชื่อแผ่นงานทั้งหมดในเซลล์อย่างรวดเร็วด้วย VBA

หากคุณต้องการใส่ชื่อแผ่นงานทั้งหมดในเซลล์มาโคร VBA เป็นตัวเลือกที่ดี

ขั้นตอนที่ 1: กดปุ่มค้างไว้ อื่น ๆ + F11 ใน Excel และจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

ขั้นตอนที่ 2: คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในหน้าต่างโมดูล

VBA สำหรับการแทรกชื่อแผ่นงานทั้งหมดในเซลล์:

ชื่อแผ่นงานย่อย ()
คอลัมน์ (1)
สำหรับ i = 1 To Sheets.Count
เซลล์ (i, 1) = ชีต (i) .Name
ต่อไปฉัน
ย่อยสิ้นสุด

ขั้นตอนที่ 3: กดปุ่ม F5 กุญแจสำคัญในการเรียกใช้แมโครนี้ จากนั้นชื่อของเวิร์กชีตทั้งหมดจะปรากฏในคอลัมน์ A ของแผ่นงานปัจจุบัน ดูภาพหน้าจอ:
doc-insert-sheets-name-to-cells2

หมายเหตุ: ในรหัส VBA คุณสามารถเปลี่ยนได้ เซลล์ (i, 1) ไปยังการอ้างอิงอื่นเพื่อแทรกชื่อแผ่นงานเริ่มต้นที่เซลล์อื่น ตัวอย่างเช่นแทรกชื่อแผ่นงานเริ่มจาก C3 เปลี่ยนเป็น เซลล์ (i + 2, 3).


ลูกศรสีฟ้าฟองขวา แทรกชื่อแผ่นงานที่ใช้งานได้อย่างรวดเร็วด้วย Kutools for Excel

หากคุณต้องการแทรกข้อมูลของแผ่นงานที่ใช้งานอยู่รวมถึงชื่อแผ่นงานชื่อสมุดงานเส้นทางไฟล์และอื่น ๆ ไปยังเซลล์หรือส่วนหัว / ส่วนท้ายคุณสามารถใช้ Kutools สำหรับ Excel's แทรกข้อมูลสมุดงาน.

Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น 

หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:

1. เลือกเซลล์หรือช่วงที่จะใส่ชื่อแผ่นงานแล้วคลิก Kutools พลัส > สมุดงาน > แทรกข้อมูลสมุดงาน.doc แทรกข้อมูลแผ่นงาน 1

2. จากนั้นเลือกข้อมูลสมุดงานที่คุณต้องการแทรก ข้อมูล และระบุตำแหน่งที่คุณต้องการวางข้อมูล แทรกที่ มาตรา. จากนั้นคลิก OK.

doc 1

คุณสามารถคลิกที่นี่เพื่อทราบข้อมูลเพิ่มเติมเกี่ยวกับแทรกข้อมูลสมุดงาน

ลูกศรสีฟ้าฟองขวา แทรกข้อมูลสมุดงานลงในเซลล์ / ส่วนหัว / ส่วนท้าย


ลูกศรสีฟ้าฟองขวา แทรกชื่อแผ่นงานทั้งหมดอย่างรวดเร็วด้วยการเชื่อมโยงหลายมิติในเซลล์เป็นดัชนี

Kutools สำหรับ Excel's สร้างรายการชื่อแผ่นงาน ยูทิลิตี้ไม่เพียง แต่แทรกชื่อแผ่นงานทั้งหมดในเซลล์ แต่ยังแทรกไฮเปอร์ลิงก์ไปยังแผ่นงานที่เกี่ยวข้องด้วย

Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น 

หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:

ขั้นตอนที่ 1: คลิกปุ่ม Kutools พลัส > แผ่นงาน > สร้างรายชื่อแผ่นงาน
doc-insert-sheets-name-to-cells3

ขั้นตอนที่ 2: ในไฟล์ สร้างรายชื่อแผ่นงาน กล่องโต้ตอบระบุการตั้งค่าตามความต้องการของคุณแล้วคลิก OK.
doc-insert-sheets-name-to-cells4

จากนั้นคุณจะเห็นชื่อแผ่นงานทั้งหมดถูกแทรกในแผ่นงานใหม่และแต่ละชื่อแผ่นงานจะเชื่อมโยงไปยังแผ่นงานที่เกี่ยวข้อง ดูภาพหน้าจอต่อไปนี้:

ชื่อเวิร์กชีตที่มีการเชื่อมโยงหลายมิติ
ชื่อเวิร์กชีตที่มีปุ่มมาโคร
doc-insert-sheets-name-to-cells5
doc-insert-sheets-name-to-cells6

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

ลูกศรสีฟ้าฟองขวา แสดงชื่อแผ่นงานทั้งหมดด้วยไฮเปอร์ลิงก์



Kutools for Excel: 300 + ฟังก์ชันที่คุณต้องมีใน Excel ทดลองใช้ฟรี 30 วันจากที่นี่

รวมหลายแผ่นงาน / สมุดงานเป็นแผ่นงานเดียวหรือสมุดงาน

ในการรวมแผ่นงานหลายแผ่นหรือสมุดงานเป็นแผ่นงานเดียวหรือสมุดงานอาจเป็นเรื่องที่น่าสนใจใน Excel แต่ด้วยไฟล์ รวมกัน ฟังก์ชันใน Kutools สำหรับ Excel คุณสามารถรวมแผ่นงาน / สมุดงานหลายสิบแผ่นไว้ในแผ่นงานหรือสมุดงานเดียวได้นอกจากนี้คุณยังสามารถรวมแผ่นงานเข้าด้วยกันโดยคลิกเพียงไม่กี่ครั้งเท่านั้น  คลิกเพื่อทดลองใช้งานฟรี 30 วันเต็มรูปแบบ!
รวมแผ่น
 
Kutools for Excel: มีโปรแกรมเสริม Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

kte แท็บ 201905


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (32)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to find the sheet name (section name ) when you type employee no. in a cell? A workbook has 15 sheets named as per sections of the department.In each section has 100 employees in range A2:A101with unique employee no. I have a list of 50 employee nos in different sections. In a new work sheet how to find the section name which corresponds to the employee no.
This comment was minimized by the moderator on the site
Hello, Ashley Pereira, please visit this: https://www.extendoffice.com/documents/excel/5335-excel-vlookup-return-sheet-name.html this article may help you.
This comment was minimized by the moderator on the site
How do you get this formula to copy the tabnames into consecutive columns. In other words not vertically but horizontally.
This comment was minimized by the moderator on the site
Change the following:

Cells(i, 1) = Sheets(i).Name
to
Cells(1, i) = Sheets(i).Name

This causes to step columns in same row.
This comment was minimized by the moderator on the site
you can copy the data entered, then paste Transpose, this converts Cols to Rows, and Rows to Cols.
This comment was minimized by the moderator on the site
Just tried now the macro for inserting all the sheet's name in one sheet. Awesome! Thank you very much
This comment was minimized by the moderator on the site
How do you get the VBA to start in a specific cell instead of A1?
This comment was minimized by the moderator on the site
Just add to i like I did below. If you add to i you can start on any row you would like.

Sub GetNames()

For i = 1 To Sheets.Count

Cells(i + 6, 1) = Sheets(i).Name

Next i
End Sub
This comment was minimized by the moderator on the site
Thank u for your supplement.
This comment was minimized by the moderator on the site
You can change the number in Cells(i, 1) = Sheets(i).Name to other to insert the sheet names in other column, for instance, insert start from C1,change Cells(i, 1) = Sheets(i) to Cells(i, 3) = Sheets(i), but this VBA only can insert the sheet names start from the row 1.
This comment was minimized by the moderator on the site
Thanks!! this was was a great help.
This comment was minimized by the moderator on the site
Hi Kindly i want VBA code to insert file name in specific cell. Thanks
This comment was minimized by the moderator on the site
Great site was very helpful. I have different tab names and I get the names in one sheet using your code, but it gives names of all the tab names, is there anyway we can add code to select from certain tab number or something like that.
This comment was minimized by the moderator on the site
I have multiple project sheets database with different tab name and this name is shown in master sheet table. which formula can i give that when i insert new tab it should automatically updated in master table.
This comment was minimized by the moderator on the site
Can anyone help me with this: Create a macro that creates 10 sheets and name them Sheet1 to Sheet10 but using a loop
This comment was minimized by the moderator on the site
Hello, Can you please help me with the simple VBA code. I have a list of Names in Column A. Specific Range - (A2:A251) - Now I need to create new spreadsheets with these names. The names are driven from a different sheet, thus they keep changing. So in short, if I have 10 names today, they might not appear tomorrow. So on the click of button all older spreadsheets (except 1) should be deleted first and then from the names on the column, new ones should get created. Please advice if this is possible to do? Thanks, Manish Gupta
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations