Excel2007創建目錄工作表以顯示所有工作表的名稱和鏈接（vba根據目錄生成工作表）

我們經常把同類相關excel2007工作表集中保存在同一文檔中，以便于在各表格間進行引用、查看。當一個文檔中的工作表達到一定數量時，要想找到需要的工作表就變得很麻煩了。此時若能建立一張“目錄”工作表顯示所有工作表的名稱和鏈接，事情將會簡單很多。

描述：一個工作簿中有多個工作表，標簽已經排不下，查看起來比較麻煩，想在每個工作表中都創建一個目錄，方便查看各個工作表。

在第一張表格里先把所有表格的名稱編成目錄順序，然后在每個名稱上點擊右鍵“超鏈接”，找到你當前的工作簿并選中它，再點“書簽”，在彈出的框中選擇名稱對應的工作表，如果還想鏈接時定位到某單元格，還可以在“請鍵入單元格引用”中輸入單元格的名稱，如“H90”等，其他也按這樣操作，那你只要打開工作簿的第一張表格就可選擇其他任何表格了，你還可以在第一張表格外的其他表格的同一地方做一個超鏈接回到第一張表格的書簽，這樣就可以互相轉來轉去的很方便了。

定義名稱

打開Excel2007，鼠標右擊第一張工作表標簽選擇“重命名”，把它重命名為“目錄”工作表。選中B1單元格，切換到“公式”選項卡，單擊“定義名稱”，在彈出的“新建名稱”窗口中輸入名稱“工作表名”，在引用位置中則輸入公式=INDEX(GET.WORKBOOK(1)，$A1)&T(NOW())，單擊確定即可定義出一個名為“工作表名”的名稱。

公式中GET.WORKBOOK(1)用于提取當前工作簿中所有工作表名稱，INDEX函數則按A1中的數字決定要顯示第幾張工作表的名稱。此外，由于宏表函數GET.WORKBOOK(1)在數據變動時不會自動重算，而NOW()是易失性函數任何變動都會強制計算，因此我們需要在公式中加上NOW()函數才能讓公式自動重算。函數T()則是將NOW()產生的數值轉為空文本以免影響原公式結果。

注意：宏表函數GET.WORKBOOK，不能直接在單元格公式中使用，必須通過定義名稱才能起作用。

目錄設置

在“目錄”工作表的A1單元格輸入1，在B1單元格輸入公式=IFERROR(HYPERLINK(工作表名&"!A1"，RIGHT(工作表名，LEN(工作表名)-FIND("]"，工作表名)))，"")。公式表示當名稱“工作表名”的值為錯誤值時顯示為空“”，否則創建指向“工作表名!A1”的超鏈接并顯示該“工作表名”。

然后選中A1：B1單元格，把鼠標指向選中區右下角的“填充柄”按住鼠標左鍵向下拖動到300行，把公式和編號填充出300行，在A、B列就會馬上自動列出所有工作表目錄(圖2)。單擊相應工作表名稱即可快速切換到該工作表中。請參照可能的最多工作表個數來決定向下填充行數，一般300個應該夠了。

提示：公式中RIGHT(工作表名，LEN(工作表名)-FIND("]"，工作表名))這段函數的作用是除去“工作表名”中“]”以前的內容。若你不介意工作表名稱前顯示“[BOOK1.xlsx]”一類內容的話，可以把B1中的公式簡化成=IFERROR(HYPERLINK(工作表名&"!A1"，工作表名)，"")。

保存設置

切換到“開始”選項卡適當設置一下目錄中的字體、字號和顏色等等，建議把字號放大并設置加粗以便查看，還要調整一下A：B列的列寬以便完全顯示工作表名稱。然后右擊其他工作表標簽選擇“刪除”，把所有其他工作表全部刪除只保留一張“目錄”工作表。最后單擊“Office”按鈕，選擇“另存為”，在彈出的另存為窗口中選擇保存類型為“Excel啟用宏的模板(*.xltm)”格式、文件名為“目錄.xltm”，保存到C:\Program Files\Microsoft Office\Office12\XLSTART文件夾下，關閉Excel 2007退出。若你的Office不是按默認路徑安裝，請按實際安裝路徑修改。

三秒創建目錄

以后要為工作簿創建目錄就簡單了，只要用Excel 2007打開要創建目錄的工作簿，在第一張工作表的標簽上右擊選擇“插入”，在“插入”窗口中雙擊選擇“目錄”，即可在第一張工作表前插入一張“目錄”工作表，并顯示出所有工作表目錄。這操作有3秒就夠了吧?

在“目錄”工作表中，可通過對目錄進行篩選、排序、查找來快速找到工作表名，然后單擊工作表名即可打開相應工作表。創建目錄后，在這個工作簿中增加、刪除工作表或者修改工作表名稱，“目錄”工作表中的工作表目錄都會自動更新。此外，前面我們只復制了300行目錄公式，因此工作表總數超過300個時，超出的工作表名就不會顯示了，得把“目錄”工作表中A1：B1的公式再向下復制填充才行。

由于宏表函數GET.WORKBOOK(1)是通過宏功能起作用的，所以插入了工作表目錄的文檔最后都必須以“Excel啟用宏的工作簿(*.xlsm)”格式另存，這樣下次打開時才能正常顯示工作表目錄。此外，打開工作簿時，Excel 2007默認會禁用宏，得單擊警告欄中的“選項”按鈕，選中“啟用此內容”單選項，確定后才能顯示工作表目錄。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。