|
制作工作表目錄大致有兩種方法： 1.使用宏函數(shù) 2.使用VBA。 推薦使用VBA方法，理由見下： 1. 宏函數(shù)的方法不是很難理解，知道兩條語句里面的函數(shù)意思就可以明白，而且即使不明白也不影響使用，具體方法可以看這個帖子： 還有這個： 但是宏函數(shù)方法缺點(diǎn)是需要手動操作，稍微有點(diǎn)麻煩。 2. VBA的方法，強(qiáng)烈推薦使用這種方法。因?yàn)檫@種方法快捷方便。對于大部分人來說我們不需要搞懂里面的代碼是什么意思，只需要知道怎么用就行了。 但是工作表目錄方法有個小缺點(diǎn)，就是生成的超鏈接目錄是不能被查找到的。解決辦法就是重新復(fù)制出來一列，在新的一列全部取消超鏈接即可。 關(guān)于VBA方法，以及取消超鏈接的詳細(xì)圖文步驟如下： 第一步：打開excel文件，在第一個工作表前面插入一個新的工作表，名稱為“目錄”，注意必須是這個名字，因?yàn)楹竺娴拇a里面用到了引用了這個名字。如圖：  第二步：在“目錄”工作表上點(diǎn)擊右鍵，選擇“查看代碼”，如圖：  第三步：在彈出的VBA窗口中輸入如下代碼：
Sub 鏈接() Sheets("目錄").Select '注意 '顯示所有工作表 For i = 1 To Sheets.Count Cells(i + 1, 2).Value = Sheets(i).Name Next '超鏈接 For i = 1 To Sheets.Count t = Cells(i + 1, 2) Cells(i + 1, 2).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", _ SubAddress:=t & "!A1", ScreenTip:="進(jìn)入", TextToDisplay:=t Next End Sub
如圖所示：  第四步：輸入好了之后，點(diǎn)擊上面的運(yùn)行按鈕，如圖所示;  第五步：關(guān)掉VBA，就可以看到Excel文件的目錄工作表已經(jīng)有各個工作表的名稱了，點(diǎn)擊即可進(jìn)入對應(yīng)的工作表。如圖：  第六步：但是這個時候，帶有超鏈接的文字是不給搜索的，所以可以這樣，復(fù)制這一列到它的左邊一列，然后在新復(fù)制出來的那列框中右鍵選擇“取消超鏈接”，這樣就可以搜索了。   如上圖，這樣就有一列可以搜索的工作表，對應(yīng)著一列可以超鏈接的工作表。Enjoy！
|
|
|
