使⽤vba在excel中连接mysql数据库查询数据有多少条记录
安装相关请⾃⾏百度，有详细图⽂步骤。
博主使⽤的ODBC连接查询mysql数据库，并返回数据显⽰到excel中
先画⼀个随便的按键↓
点击后，选第⼀个按键，在想要添加按键的位置画⼀个区域↓
右键按键选新增，跳转到代码编辑页⾯
代码↓
Sub 嘤嘤嘤()
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
mysql下载odbc失败Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
//连接数据库
conn.ConnectionString ="Driver={MySQL ODBC 8.0 Unicode Driver};Server=localhost;DB=yourdb;UID=root;PWD=root;OPTION=3;"    conn.Open
conn.CursorLocation = adUseClient
rs.Open "SELECT * FROM EMP", conn
//显⽰多少条记录
MsgBox rs.RecordCount
rs.Close: Set rs = Nothing
conn.Close: Set conn = Nothing
End Sub
最后效果↓

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。