excel怎么使用workbooks计算打开的工作薄数量

excel中使用workbooks计算打开的工作薄

先拿一个实际的工作表来演示一下。

按下 Alt+F11 组合键，快速进入VBE编辑器。插入一个新模块，然后敲入下面这段代码：

Sub testWorkbookCount()
    Dim wbs As Workbooks
    Set wbs = Application.Workbooks
    MsgBox wbs.Count
End Sub

这里主要展示的是Workbooks属性中的一个基本功——计数方法。后面还会陆续介绍其他实用方法。运行这段代码，会弹出一个消息框，告诉你当前打开了几个工作簿。

wbs 是作用于工作簿的变量，所以声明时用了 Dim wbs As Workbooks。

Workbooks 本身是对象的一个属性，因此需要用 Set 来赋值，这一点别搞混了。

MsgBox 负责弹出提示信息，Count 是Workbooks属性中的一个方法，直接调用 .Count 就能拿到数量，然后通过 MsgBox 显示出来。

刚才演示时只打开了一个工作簿（指的是不同Excel文件）。如果同时打开多个不同的Excel文件，Count就会统计出所有打开的文件总数。