向excel最后一行接着添加一条记录，代码如下
Private Sub Command4_Click()

Dim sqlstr As String
sqlstr = " select * from [sheet1$]"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
Adodc1.Recordset.MoveLast
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields(0) = 90
Adodc1.Recordset.Fields(1) = 78
Adodc1.Recordset.Fields(2) = 79
Adodc1.Recordset.Update '//出错句
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh

End Sub
出现错误如下
实时错误'-2147467259（80004005）'：
[Microsoft][ODBC Excel Driver]操作必须使用一个可更新的查询。
程序停止在Adodc1.Recordset.Update

请问使用sql语句能在vb里对excel进行添加、查询、删除等操作吗

2007没用过。
数据批量地导出到Excel在论坛的主页面可以搜索到，有现成的案例，改几个字符就只可以用了。
对特定表格输入对应的字符《VB精彩编程200例》有案例。

[ 本帖最后由 chen3523 于 2014-5-28 13:29 编辑 ]