😎 เคล็ดลับวิธีสร้างสารบัญแสดงรายชื่อชีท
ให้เปลี่ยนตามชื่อชีท ลำดับชีท หรือชื่อแฟ้มที่เปลี่ยนแปลงในอนาคต
.
1. เพื่อสร้างลิงก์ไปที่ชีท ให้สร้างสูตร
=HYPERLINK($C$5&C7&”!”&$C$6,C7)
.
2. เซลล์ C5 ใช้สูตร =”[“&WBName()&”]” เพื่อดึงชื่อแฟ้มมาแสดง
.
3. เซลล์ C7 ใช้สูตร =GetSheetName(B7) เพื่อแสดงชื่อชีทตามเลขลำดับที่ใส่ไว้ในเซลล์ B7
.
4. เซลล์ C6 ใส่คำว่า A1 ซึ่งเป็นตำแหน่งเซลล์ที่ต้องการ
.
ส่วน VBA ให้สร้าง Module ที่ใช้รหัสคำสั่งตามนี้เพื่อสร้างสูตรแสดงชื่อชีทกับชื่อแฟ้ม
.
Function GetSheetName(x)
GetSheetName = Sheets(x).Name
End Function
.
Function WBName() As String
WBName = ThisWorkbook.Name
End Function
.
Download แฟ้มตัวอย่างได้จาก
https://drive.google.com/file/d/1_I6bOH6hacZrVeod7k3nd2xDHLvEyVvE/view?usp=sharing