JSY的拾掇ㄉㄨㄛˊ

在某些情況下，您可能需要判斷並列出 Excel 活頁簿中的工作表名稱。例如，您可能需要建立活頁簿中的工作表目錄索引，再將結果儲存在其他工作表中，以便快速找出特定工作表的位置。做法如下：

1.啟動 Excel，新的空白活頁簿隨即出現。

2.在工作表中加入指令按鈕：

選取 Sheet1。

在[檢視]功能表中，指向[工具列]，然後按一下 [控制工具箱]。

按一下[指令按鈕]按鈕。

在工作表中按一下以插入指令按鈕，然後按一下指令按鈕的框線，進行拖曳調整大小。

3.現在，將 Visual Basic 程式碼加入指令按鈕：

用滑鼠右鍵按一下指令按鈕，然後按一下快顯功能表上的[檢視程式碼]。

在 Microsoft Visual Basic® 編輯器中，

在 Private Sub CommandButton1 陳述式和 End Sub 陳述式之間輸入下面的程式碼：

Set NewSheet = Sheets.Add(Type:=xlWorksheet)

  For i = 1 To Sheets.Count

  NewSheet.Cells(i, 1).Value = Sheets(i).Name

  Next i

4.在[檔案]功能表中，按一下[關閉並回到 Microsoft Excel]。

5.在[控制工具箱]中，按一下[結束設計模式]以結束設計模式，並啟用指令按鈕。

6.按一下 Sheet1上的指令按鈕。

隨即建立一個新的工作表，其中列出活頁簿中所有工作表的名稱。

http://office.microsoft.com/zh-tw/excel/HA010429191028.aspx

Excel多個工作表的切換密技

在新工作表中，設計一個「總目錄」的表格，將所有工作表的「名稱」輸入到表格中。

例如：在「總目錄」工作表的C4儲存格中輸入「Sheet2」這幾個字，

並於D4儲存格中輸入「=HYPERLINK("#"&C4&"!a1",C4)」，

將對應的工作表標籤做成超連結；其他欄位請依序以C5、C6、C7填入，

或者從D4儲存格的右下角黑方塊直接下向填滿。

公式中，「a1」就是對應到「Sheet2」工作表中的A1儲存格。

當然在「Sheet2」工作表中，也能設計一個跳回目錄鈕。

在儲存格輸入「回總目錄」，再按下滑鼠右鍵選擇【超連結】，

將目標指向「這份文件中的位置」→「總目錄」。

其他工作表就如法炮製，這樣超迅速目錄就完工了

http://pcuser.pixnet.net/blog/post/17368370