當Excel中的工作表數量很多時，有一個帶鏈接的目錄真是太方便了，如下圖所示，當我們選中“目錄”表中對應A列的表名就會跳轉到對應的表并自動隱藏其他的表 。
這樣的Excel工作表目錄該如何制作呢？下面小編就帶大家了解一下制作原理及步驟吧！
首先我們需要新建一個空白的工作表，重命名為“目錄”，作為我們制作目錄的存放的位置 。
然后，右擊“目錄”工作表名稱標簽，點擊“查看代碼”命令，自動彈出VBA代碼錄入編輯窗口，將下面的一段VBA代碼復制粘貼到窗口中 。最后關閉VBA窗口即可 。如下圖所示：
VBA代碼如下：
Private Sub Worksheet_Activate()On Error Resume NextSheets("目錄").Range("A1") = "目錄"k = 1For Each sh In SheetsIf sh.Name <> "目錄" Thenk = k1Sheets("目錄").Cells(k, 1) = sh.NameEnd IfNextSheets("目錄").Range("A:A").EntireColumn.AutoFitSheets("目錄").Range("A:A").EntireColumn.Horizo
猜你喜歡
- 奧迪a4l汽車座椅怎么調節合適 奧迪a4l車座椅怎么調整
- AI illustrator怎么導出其它版本的ai格式文件？AI導出其它ai版本文件教程！
- pe下格式化錯誤000000 進pe格式不了硬盤提示00000錯誤什么意思
- 麥克風聲音小怎么調整
- 求一張全透明的圖片 png格式的
- 如何把wps文檔轉換成圖片格式？怎樣把wps文字文檔變成圖片？
- 腿彎怎么變直小妙招 get起來
- 微信支付如何調整付款方式的順序 怎么調整微信付款方式的順序
- 華為手機怎么調整照片大小
- 三國群英傳怎么調整兵種 三國群英傳調整兵種方法