如何知道一個工作簿中有多少個工作表？

　　方法一、

　　(1)、打開“工具”菜單，選擇“宏”“Visual Basic 編輯器”命令，如圖所示：

　　(2)、在打開的窗口中選擇“插入”→“模塊”命令，如圖所示：

　　(3)輸入如下內容，如圖所示：

　　Sub sheetcount()

　　Dim num As Integer

　　num=ThisWorkbook.Sheets.Count

　　Sheets(1).Select

　　Cells(1,1)=num

　　End Sub

　　(4)、運行該宏，在該工作簿的第一個工作表的A1單元格中的數字就是工作表的個數。

　　方法二、

　　(1)按【Ctrl+F3】組合鍵，打開“定義名稱”對話框，定義一個x，在“引用位置”處輸入“=get.workbook(4)”，然後單擊【確定】按鈕，如圖所示：

　　(2)在任意單元格輸入“=x”，出來的結果就是工作表的個數。