在我們使用excel製作表格資料時,有時侯會分許多sheet,但是一但sheet頁多時,不論是查詢還是選中都很不方便。本文就介紹怎麼生成sheet頁連結目錄,並在各sheet頁中新增返回目錄連結。要實現此目標有幾種方法,一是採用純excel函式公式方法,二是採用純vba指令碼方法實現,但這兩種方法都不夠直觀,本文就採用簡單並容易理解的函式結合vba指令碼的方法來實現。
工具/原料
pc電腦
excel軟體(本文使用2010)
方法/步驟
開啟excel文件,建立若干個sheet頁,例如sheet1,a1,a2,a3等
點選選單中的開發工具選單,點選檢視程式碼按鈕
如果找不到開發工具選單,請點選檔案->選項->自定義功能區->主選項卡中,選中開發工具複選框
錄入以下下程式碼。目的是用來在sheet1頁中的第一列生成sheet名字列
Sub createmulu() For i = 1 To Sheets.Count Cells(i, 1) = Sheets(i).Name Next End Sub
在程式碼編輯視窗中點選綠色執行按鈕,或者按F5鍵,執行後sheet1如下圖所示:
在sheet1中B2單元格中定義超連結函式,錄入=HYPERLINK("#"&A2&"!A1",A2)
滑鼠選中B1單元格中,將滑鼠放在單元中右下側,當滑鼠變為十字時,向下拖動滑鼠
此時點選B列的sheet名稱超連結,即可開啟相應的sheet頁
按shift鍵,選中除sheet1外的其他sheet頁,在A1單元格中錄入
=HYPERLINK("#sheet1!A1","返回目錄"),然後回車。所有選中sheet頁中便成功新增“返回目錄”超連結