VB6无excel环境下，ADO方法创建excel文件并创建工作表

原创

已于 2023-04-20 08:38:01 修改 · 948 阅读

4 ·

CC 4.0 BY-SA版权

文章标签：

#excel #microsoft

于 2023-04-14 20:44:57 首次发布

在没有Excel的情况下，通过安装AccessDatabaseEngine，使用VBA和ADODB.Connection可以创建Excel文件并建立多个工作表。生成的exe程序不需要额外安装驱动或引用，即可运行并创建Excel文件。

代码环境，如果没Excel，则需要安装AccessDatabaseEngine，并引用。
生成exe程序后，无需安装任何驱动、引用，无需excel、WPS环境，即可生成Excel文件，并增加工作表。

'无Excel环境下，安装AccessDatabaseEngine（编译exe后无需安装），创建Excel文件，并新建工作表，注意C盘创建可能要管理员权限
'引用Microsoft ADO Ext 2.8 for DDL and Security
'引用Microsoft ActiveX Data Objects Recordset 2.8 Library
Private Sub Form_Load()
    Dim cn As New ADODB.Connection
    '连接字符串中指定Excel文件名及版本号
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Test.xls;Extended Properties=""Excel 8.0;HDR=Yes;"""