如何在vba中用ADOX.Catalog获取excel文件的工作表名称?

在vba中,要获取excel工作簿中的所有工作表的名称,往往需要先打开对应的excel工作簿。

本文介绍用ADOX.Catalog对象直接连接要访问的excel工作簿,实现不打开获取所有的工作表名称。

利用ADOX.Catalog对象可以获取一个数据源的框架目录,对于excel工作簿,它的框架目录包含了工作表的名称,智能表格的名称、内置的隐藏名称等。

步骤如下:

  1. 使用ADO Connection对象的Open方法先与数据源建立连接,打开数据源。
  2. ADOX.Catalog对象的ActiveConnection属性设置为步骤1中建立的Connection对象。
  3. 然后遍历将ADOX.Catalog对象的Tables属性,既可以获取相应数据源的Table。

以下是获取一个excel工作簿文件的所有工作表名称的代码:

       

发表评论