Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 4599|回复: 8

[已解决]VBA利用ADO操作excel求教

[复制链接]
发表于 2017-2-7 14:06 | 显示全部楼层 |阅读模式
我想通过excel VBA操作当前工作簿

我写的代码是这样的

    Dim conn As New ADODB.Connection
    conn.ConnectionString = "Provider=MIcrosoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName
    conn.Open

得到的错误返回值是"不能使用 '' 文件已在使用中"

我希望做的是 通过ADO来对当前工作簿内指定表内的数据插入,删除,修改

以上:麻烦大神赐教
最佳答案
2017-2-8 21:02
看看是否符合你的要求
QQ图片20170208205940.png
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2017-2-7 16:34 | 显示全部楼层
回复

使用道具 举报

 楼主| 发表于 2017-2-7 19:33 | 显示全部楼层
非常感谢2楼耐心答题,附件为我测试的工作簿,麻烦大神指正

新建 Microsoft Excel 工作表.zip

16.74 KB, 下载次数: 5

回复

使用道具 举报

 楼主| 发表于 2017-2-7 20:12 | 显示全部楼层
其实我想表达的很简单,就是用excel VBA 调用ADO操作当前excel文件
回复

使用道具 举报

发表于 2017-2-7 22:22 | 显示全部楼层
本帖最后由 today0427 于 2017-2-7 23:19 编辑

QQ图片20170207222452.png
你说的要求太宽泛,sql命令操作excel有很多方法,不同操作不同语句,增删查改不可能用一个万能语句来囊括,而且我看你的sql语句写的也不对,不知道你是想要干啥,我给你写了个框架,你要是会改就自己改下sql语句,如果困难,就提出你的具体要求


新建文件夹.rar

20.05 KB, 下载次数: 9

回复

使用道具 举报

 楼主| 发表于 2017-2-8 14:05 | 显示全部楼层
非常感谢5楼的耐心解答

其实我的要求很简单,我想通过ADO 来向thisworkbook "就是代码所在工作簿"  插入数据,删除数据,
目前这种数据库链接字符串仅仅是已只读方式打开,仅仅可以做查询  并不能插入数据,删除数据

以上!  麻烦了
回复

使用道具 举报

 楼主| 发表于 2017-2-8 14:13 | 显示全部楼层
5楼你好!

我其实就是想解决这个错误,如附件图片
123.png
回复

使用道具 举报

发表于 2017-2-8 21:02 | 显示全部楼层    本楼为最佳答案   
看看是否符合你的要求
QQ图片20170208205940.png

新建文件夹.rar

22 KB, 下载次数: 15

评分

参与人数 1 +6 收起 理由
laoau138 + 6 来学习

查看全部评分

回复

使用道具 举报

发表于 2017-2-8 21:05 | 显示全部楼层
用ado操作excel不支持整行删除这种(delete from 表名 where 字段名= ),所以我采用了一个较为变通的方式,将不符合删除条件的选择出来放进新表中,相当于新表中的数据已经删除了需要删除的行
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 04:57 , Processed in 0.561238 second(s), 17 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表