吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 1982|回复: 12
收起左侧

[求助] 小白求助,如何把数据库SQL里的数据读到EXCEL里,要学习什么?

[复制链接]
nsfinn 发表于 2019-12-4 20:08
小白求助,如何把数据库SQL里的数据读到EXCEL里,要学习什么?
大神帮忙讲一下,应该怎么用VBA连接数据库,小白求大家不要笑话

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

wls 发表于 2019-12-4 20:27
使用 Power BI
ds3700 发表于 2019-12-4 20:41
直接导出csv格式文件就行了啊!! csv就是excel文件!!!
chuxiao1023 发表于 2019-12-4 20:43
你可以在sql里面全选你需要复制的内容,ctrl+c 然后移动到excel中选中一个格子ctrl+v就可以了
yuze0804007 发表于 2019-12-4 20:54
我连过mysql数据库通过vba:
1.下载安装odbc驱动:https://dev.mysql.com/downloads/connector/odbc/
'这里最好使用把32/64位的驱动都打上
2.配置odbc connector
具体方法:win+R运行odbcad32
用户DSN>添加>Mysql ODBC 8.0 ANSI/UNICODE driver(具体编码看你的数据库了)
填写参数:socks,用户名,密码,数据库名
3.进vbe编辑器:
[Visual Basic] 纯文本查看 复制代码
Sub 连接MySQL数据库()
'1. 引用ADO工具
'2. 创建连接对象
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
'3. 建立数据库的连接
con.ConnectionString = "Driver={MySQL ODBC 8.0 Unicode Driver};Server=212.60.5.135;DB=nineteen;UID=nineteen;PWD=2019;OPTION=3;"
con.Open
rs.Open "select * from `tower`", con
'MsgBox ("连接成功!" & vbCrLf & "数据库状态:" & con.State & vbCrLf & "数据库版本:" & con.Version)
Range("A1").CopyFromRecordset rs
con.Close
Set con = Nothing
Set rs = Nothing
End Sub

以上是读取数据表tower到excel的代码


diyikuai 发表于 2019-12-4 21:40
用易语言读我会,其他的我真不会,哈哈
 楼主| nsfinn 发表于 2019-12-4 22:34
yuze0804007 发表于 2019-12-4 20:54
我连过mysql数据库通过vba:
1.下载安装odbc驱动:https://dev.mysql.com/downloads/connector/odbc/
'这里 ...

谢谢大神,我太爱你了。。爱到不行不行的。。。。
 楼主| nsfinn 发表于 2019-12-4 22:35
chuxiao1023 发表于 2019-12-4 20:43
你可以在sql里面全选你需要复制的内容,ctrl+c 然后移动到excel中选中一个格子ctrl+v就可以了

珍惜ID吧~
yuze0804007 发表于 2019-12-4 23:56
nsfinn 发表于 2019-12-4 22:34
谢谢大神,我太爱你了。。爱到不行不行的。。。。

客气,互相学习,共同进步
习惯沉淀 发表于 2019-12-6 22:49
easyExcle 或者poi 都可以写java程序就行
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-26 20:26

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

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