方法一、
(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”,出来的结果就是工作表的个数。