VB6 获取系统正在运行的EXCEL多个工作薄的清单

可以使用VB6的COM技术通过访问Excel应用程序对象来获取系统中正在运行的Excel工作簿的清单。以下是一个获取Excel工作簿清单的示例代码：

上述代码创建了一个Excel应用程序对象xlApp，并遍历了所有打开的工作簿，然后遍历了每个工作簿中的所有工作表，并输出了每个工作表的名称。你可以根据自己的需要修改代码来获取其它Excel工作簿的信息。注意，如果Excel应用程序没有打开任何工作簿，上述代码将不会输出任何内容。

接下来，在多个EXCEL窗口的情况下，如何获得呢？

在多个Excel窗口的情况下，你可以通过枚举所有正在运行的Excel应用程序来获取每个应用程序中打开的工作簿的清单。以下是一个获取所有Excel应用程序及其工作簿清单的示例代码：

上述代码使用GetObject函数枚举了所有正在运行的Excel应用程序，然后在每个应用程序中遍历了所有打开的工作簿，并遍历了每个工作簿中的所有工作表，输出了每个工作表的名称和所在的应用程序名称。

需要注意的是，如果在Excel应用程序中没有打开任何工作簿，应用程序对象将不会包含任何工作簿信息。另外，在多个Excel应用程序的情况下，你需要注意避免使用错误的应用程序对象来访问工作簿，因为每个Excel应用程序都有自己的对象模型。