Create Index page with hyperlinks to sheets

Almir's picture

This is solution to: "Hyperlink Macro that converts a list of sheet names to hyperlinks to the sheets", at: http://excelexperts.com/hyperlink-macro-converts-list-sheet-names-hyperl....

To create an index page with hyperlinks to all sheets in a workbook:

1. First, insert a new sheet and name it "Index"
2. In VBE (Alt+F11), select "Index" sheet and paste the code from the attached .txt file into the right pane:
3. Run Macro "CreateIndex"

Also, macro adds a link to the index page at each workshett, at address A1. If you want it at different address, change "A1" in the following line accordingly:

.Range("A1").Name = "Start" & wSheet.Index

Example .xlsm file attached, along with .txt file containing code.

Create Index page with hyperlinks to all sheets in a workbook
AttachmentSize
CreateIndexPage.xlsm16.95 KB
CreateIndexPage.txt926 bytes