如何知道一个工作簿中有多少个工作表?

2016-02-19 19:02 8 1 收藏

今天图老师小编要向大家分享个如何知道一个工作簿中有多少个工作表?教程,过程简单易学,相信聪明的你一定能轻松get!

【 tulaoshi.com - Excel教程 】

方法一、

(1)、打开工具菜单,选择宏Visual Basic 编辑器命令,如图所示:

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

如何知道一个工作簿中有多少个工作表?

(2)、在打开的窗口中选择插入→模块命令,如图所示:

(3)输入如下内容,如图所示:

Sub sheetcount()

Dim num As Integer

num=ThisWorkbook.Sheets.Count

Sheets(1).Select

Cells(1,1)=num

End Sub

(4)、运行该宏,在该工作簿的第一个工作表的A1单元格中的数字就是工作表的个数。

方法二、

(1)按组合键,打开定义名称对话框,定义一个x,在引用位置处输入=get.workbook(4),然后单击按钮,如图所示:

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(2)在任意单元格输入=x,出来的结果就是工作表的个数。

来源:http://www.tulaoshi.com/n/20160219/1619881.html

延伸阅读
标签: excel
如何共享Excel工作簿?   如何锁定和隐藏Excel公式   一次打开多个Excel文件的方法 &nb(www.tulaoshi.com)sp; excel提示用户定义类型未定义怎么办   对象未定义时将产生此类错误: 一种典型的情况就是在定义对象时未正确创建对象本身而导致在编译时产生用户定义类型未定义的错误提示。 对此图老师小...
标签: 电脑入门
以下代码的功能是,合并同一个工作薄中的其余的所有的工作表,将其余的表的数据,全部追加到第一个工作表后面,形成完整的唯一的一个表数据。 代码如下,稍后会附上代码说明: Dim MyCount As Integer k = Worksheets(1).UsedRange.Rows.Count + 1 For MyTable = 2 To Worksheets.Count For i = 5 To Worksheets(MyTable).UsedRange.Rows....
标签: 电脑入门
我们经常把同类相关Excel工作表集中保存在同一文档中,以便于在各表格间进行引用、查看。当一个文档中的工作表达到一定数量时,要想找到需要的工作表就变得很麻烦了。此时若能建立一张目录工作表显示所有工作表的名称和链接,事情将会简单很多。 下面介绍一种可以快速为Excel工作簿创建工作表目录的方法。 定义名称 打开Excel 2007, 右击...
标签: 电脑入门
Excel2007基础教程:删除一个不再需要的工作表 如果不再需要一张工作表,或者想删除工作簿中的一个空工作表,那么可以通过两种方法来删除它: 右击表标签并从快捷菜单选择"删除飞 选择"开始" Q "单元格" Q "删除工作表" 。如果工作表含有任何数据, Excel 会询问是否确认删除此表。如果该表从未被使用过...
标签: 电脑入门
Excel2007基础教程:添加一张新工作表到工作簿 工作表可以成为一个非常好的组织工具。您可以根据逻辑需要把不同的元素放在不同的工作表中,而不是把所有的东西全都放在同一张工作表中。例如,如果 您有几种产品,对它们的销售单独进行记录,那么就可以把每一样产品记录放在各自的工作表中,然后再使用其他工作表合并这些结果。 下面是三种向...

经验教程

67

收藏

88
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部