本文目录一览：

VB采用ADO方式操作EXCEL表格的操作步骤

代码如下：操作 book1.xls 的 sheet1 工作表,注意要写成 sheet1$ (加个美元符号)

Dim adoConnection As New ADODB.Connection

Dim adoRecordset As New ADODB.Recordset

'OLE DB + ODBC Driver 方式:

'adoConnection.Open "Data Provider=MSDASQL.1;driver=Microsoft Excel Driver (*.xls);DBQ=cbook1.xls"

'Microsoft.Jet.OLEDB.4.0 方式,(建议)

adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;" _

"Data Source=c:book1.xls;Extended Properties='Excel 8.0;HDR=Yes'"

adoRecordset.Open "select * from [sheet1$]", adoConnection, adOpenKeyset, adLockOptimistic

Debug.Print adoRecordset.RecordCount

Dim i As Integer

Do Until adoRecordset.EOF

For i = 0 To adoRecordset.Fields.Count - 1

Debug.Print adoRecordset.Fields.Item(i).Name

Debug.Print adoRecordset.Fields.Item(i).Value

Next i

adoRecordset.MoveNext

Loop

构造ConnectionString时，OLEDB的提供者要选择MicrosoftJet4.0OLEDBProvider作为ADO的驱动程序。这本来是用于连接Access数据库的驱动程序，但也可打开Excel文件。连接的数据库名称当然就是你要打开的Excel文件，注意扩展名是*.xls，而不是*.mdb，如c:book1.xls最关键的一点是，还要设置扩展属性ExtendedProperties为"Excel8.0"，否则，测试连接时会报告无法识别数据格式的错误。HDR是指明有没有标题头，默认就是"Yes"，所以这里也可以不写

'注: OLE DB + ODBC Driver 方式不支持以下语句,但 Microsoft.Jet.OLEDB.4.0 方式支持!adoConnection.Execute "insert into [sheet1$](姓名) values(3)"adoRecordset.AddNew Array("姓名", "性别", "年龄", "地址"), Array(1, 2, 3, 4)

以上就是今天分享的“VB采用ADO方式操作EXCEL表格的操作步骤”，希望大家有所收获。

ado 读写excel 设置格式

ado 读写excel 设置格式比较简洁，总体来说分以下几步：

1.定义“Adodb.Connection”对象myCN；

2.使用对象OPEN函数连接文档；

3.使用对象Execute函数执行SQL语句，并返回查询结果。

4.将查结果拷贝到EXCEL中。

另外有两个点多说两句，OPEN函数的连接字符串和表头。

OPEN函数的连接字符串：

"Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" FilePath "; Extended Properties='Excel 12.0; HDR=YES; IMEX=3'" 'HDR 是否有表头；IMEX，013，写读读写

字符串除了写明软件版本，就两个参数，HDR是否有表头，IMEX申明读写方式，0是写入，1是读出，3是读写；（网上有很多教程写的参数值为2是“读写”，个人测试应该是3）

表头：

表头操作需要使用到反馈结果对象（记录集）的Fields函数，实际上就是表头数组，Count返回表头数量（即列数或者说是字段数量），name返回具体表头文本值。

SQL语句可参考相关教程，在此不再赘述。

说了这么多，还是大家自己操作吧，对了ADO支持操作文档本身，所以可以使用EXCEL的第一个sheet作为输出页，第二个sheet作为数据库页面，以下附件文件即是如此。

Excel 怎么用ADO来进行数据汇总

在通过ADO对Excel对象进行连接时（此时Excel则认为是一个数据源），需要配置对Excel数据源对应的连接串，这个连接串中包括了Provider信息（其实类似对数据库进行连接操作时，都需要指定连接字符串），

以下是一行连接串源代码： strConnString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" strExcelFilePath ";Extended Properties=Excel 12.0" 这里的Provider使用了Microsoft.ACE.OLEDB.12.0，其实除了Microsoft.ACE.OLEDB.12.0，还有Microsoft.Jet.OLEDB.4.0，它们俩者之间有什么联系和区别呢： 共同点：都是做为连接Excel对象的接口引擎 不同点：

对于不同的Excel版本，有两种接口可供选择：Microsoft.Jet.OLEDB.4.0（以下简称 Jet 引擎）和Microsoft.ACE.OLEDB.12.0（以下简称 ACE 引擎）。 Jet 引擎，可以访问 Office 97-2003，但不能访问 Office 2007。 ACE 引擎是随 Office 2007 一起发布的数据库连接组件，既可以访问 Office 2007，也可以访问 Office 97-2003。

急！-ado中与excel连接的问题？

在李维书中典范例的excel文件里，新参加一个工作表也不可（将原典范的数据copy过来也不可）在adotable.tablename里显示如下：tablename选择

forcast

可以，选择forcast$、abc$就掉足，或用abc也不可。forcast

-原有forcast$

-原有abc$

-自已新增工作表

.

.

.

delphi7.0 中 用 ado 如何 操作 excel 并导出 excel表？

1、读EXCEL:

const

Const_Conn='Provider=Microsoft.Jet.OLEDB.4.0;Data

Source=%s;Persist

Security

Info=False;Extended

Properties=Excel

8.0;';

adoConnProduct.Close;

adoConnProduct.ConnectionString:=Format(Const_Conn,[FProductFile]);//FProductFile：

EXCEL

全路径

adoConnProduct.Open();

有了ADO连接，至于取表的数据就简单了

2、至于导出，就有很多GRID控件都可以导出成EXCEL，如：EHLIB,DEV。。。。。

希望我的回答能帮助到你。

如何利用ADO操纵Excel文件

在日常生活中,通常有很多表格文件用Excel存放,访问Excel表格的方法很多,在Delphi中可以通过Servers中的ExcelApplication,ExcelWorkBook,ExcelWorkSheet等控件操纵Excel中的数据.但是我们无法用ADO操纵Excel文件中的Sheet,ADO控件会告诉你"[microsoft][OdbC Excel driver]Microsoft Jet 数据库引擎找不到对象'Sheet1'.请确定对象是否存在,并正确地写出它的名称和路径.

那么如何才能正确的操纵Excel呢???

首先用ADO连接Excel,至于怎么连接Excel我想不用我说了吧.

然后这个是个关键:打开Excel,先"插入"-"名称"-"定义",如图:

输入一个名称,如:OK,按"添加"按钮,然后指定引用位置,如图:

最后按"确定",然后存盘,这关键的一步就算完成了.

现在你在Delphi中就可以通过ADOQuery或ADOTable等自由操纵表名为"OK"的表了.

注意:1.你可以在一个Excel文件中定义多个名称,当多个表使用

2.此方法不能用于Excel中的Chart等元素