vbs读取excel数据

用vbs读取Excel文件的函数代码

标题中的“用vbs读取Excel文件的函数代码”指的是使用Visual Basic Script（VBS）编写的功能，该功能能够读取Excel文件中的数据，而无需实际安装Microsoft Office Excel。描述中提到，这个方法对那些不希望或无法安装Excel但仍然需要处理Excel文件的用户非常有用。 VBS是一种脚本语言，常用于Windows系统的自动化任务。在本例中，它通过ADO（ActiveX Data Objects）来访问Excel文件，特别是通过ADODB.Connection和ADODB.Recordset对象。下面是对这部分代码的详细解释：

1. **核心代码解析**： - `ReadExcel`函数接受5个参数： - `myXlsFile`：Excel文件的完整路径和名称。 - `mySheet`：要读取的工作表名称。 - `my1stCell`：开始读取的第一单元格索引，如"A1"。 - `myLastCell`：要读取的最后一个单元格索引，如"D100"。 - `blnHeader`：布尔值，表示第一行是否为表头。 - 使用`Dim`声明变量`arrData()`，`i`和`j`。`arrData`是一个二维数组，用于存储从Excel中读取的数据。 - 创建`objExcel`对象，它是`ADODB.Connection`类型，用于打开Excel文件。 - `objRS`是`ADODB.Recordset`对象，用于读取特定范围内的数据。

2. **ADO组件**： - **ADODB.Connection**：用于建立到数据源的连接。在这个例子中，它连接到Excel文件，使用Jet OLEDB提供程序。 - **ADODB.Recordset**：表示从数据源中获取的一组记录。在这里，它被用来遍历Excel工作表上的特定单元格范围，并将数据加载到数组中。

3. **数据读取过程**： - 当遍历到空行时，循环停止，确保数组只包含非空数据。 - 对于每一行数据，`objRS.Fields.Count - 1`获取字段（列）的数量，`i`作为行索引，将数据添加到`arrData`数组中。