ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: ctp_119

[原创] 跟我学SQL in Excel

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2013-11-16 18:57 | 显示全部楼层
本帖已被收录到知识树中,索引项:SQL应用
ctp_119 发表于 2013-11-16 09:46
各种错误都有,如关键字的拼写错误,我经常记不住discint的,,还有order by 写成order on等等。。。。哈 ...

我最郁闷的是有次 把 逗号 写成了 点 找了10几分钟的错误

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-11-18 08:23 | 显示全部楼层
xianxing110a 发表于 2013-11-16 18:57
我最郁闷的是有次 把 逗号 写成了 点 找了10几分钟的错误

嗯,学习sql时不时都会发生这样的事情的。很正常,只是犯过后,以后错误就会慢慢变少。呵呵,这是我的感受!

TA的精华主题

TA的得分主题

发表于 2013-12-2 13:12 | 显示全部楼层
ctp_119 发表于 2013-10-18 13:48
所谓的前期绑定是指手工勾选添加引用文件,具体操作步骤是选择VBE菜单中的工具->引用,勾选“MicrosoftAct ...

①  期绑定法(实例)

Option Explicit

Sub 前期绑定()

Dim cnn As NewADODB.Connection

Dim rst As NewADODB.Recordset

Dim i As Integer

Dim sql As String

Columns("F:I").Clear

cnn.Open"Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties='Excel12.0;Hdr=Yes';Data Source=" & ThisWorkbook.FullName

sql = "select* from [Sheet1$] where 客户名称='韩正'"

Set rst =cnn.Execute(sql)

[F2].CopyFromRecordsetrst

For i = 0 Torst.Fields.Count - 1

    Cells(1, i + 6) = rst.Fields(i).Name

Next i

End Sub

学习了!
顺便请教一下:比如还想在代码中添加多一个select句子 sql1 ,代码应怎么去修改?
目的是,代码运行一次,执行2个select句子,或更多的select句子。

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-12-2 14:05 | 显示全部楼层
b12b3bb 发表于 2013-12-2 13:12
①  期绑定法(实例)

Option Explicit

只要是同一个连接里面且没有关闭连接,你加N个select语句都没有关系的。

TA的精华主题

TA的得分主题

发表于 2013-12-2 15:05 | 显示全部楼层
ctp_119 发表于 2013-12-2 14:05
只要是同一个连接里面且没有关闭连接,你加N个select语句都没有关系的。

照搬了楼上代码,想添加个select语句;不懂VBA,也不知select语句放哪个地方和修改哪。版主能否帮做一个?谢谢!!!

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-12-3 07:55 | 显示全部楼层
b12b3bb 发表于 2013-12-2 15:05
照搬了楼上代码,想添加个select语句;不懂VBA,也不知select语句放哪个地方和修改哪。版主能否帮做一个? ...

放在sql语句的下面,执行SQL语句的上面即可。

TA的精华主题

TA的得分主题

发表于 2013-12-4 21:12 | 显示全部楼层
最近学习数据透视表,真缺这方面的知识,得学习学习。谢谢程老弟!

TA的精华主题

TA的得分主题

发表于 2013-12-11 09:53 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2013-12-14 10:44 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
ctp_119 发表于 2013-11-16 09:43
我是先整体完成,发现错误,再拆分,一一验证出错地方,再纠正,,,呵呵,和你差不多吧,尤其是开始写SQ ...

问下怎么拆分检查啊?我老是学不会。。。。。

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-12-14 12:31 | 显示全部楼层
dingmeng1982 发表于 2013-12-14 10:44
问下怎么拆分检查啊?我老是学不会。。。。。

拆分嵌套。先里面后外面,一层层的剥开即可。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-23 19:13 , Processed in 0.042898 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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