vba如何调用mysql数据

❶ WPS 表格如何连接MySQL 数据库

编写Excel VBA工具，连接并操作Mysql 数据库。

系统环境：

OS：Win7 64位 英文版

Office 2010 32位 英文版

1、VBA连接MySql前的准备

Tools--->References..---->引用

勾选Microsoft ActiveX Data Objects 2.8 Librarys和Microsoft ActiveX Data Objects Recordset 2.8 Librarys

下载上图中Windows(x86,32-bit),Zip Archive版本，在测试中，使用64位的版本无法连接到Mysql

把下载上述文件拷贝放到资源管理器里，放到合适位置，解压，点击里面的install.bat批处理文件。

从“控制面板”--->“管理工具”---->ODBC,打开以后，从这个里面无法看到Mysql的驱动，实际上使用的是下面32位的ODBC驱动

C:WindowsSysWOW64文件夹下的odbcca32.exe

3.连接示例

SubTestConnectTodb()DimconnAsADODB.ConnectionDimrsAsADODB.RecordsetSetconn =NewADODB.ConnectionSetrs =NewADODB.Recordsetconn.ConnectionString ="Driver={MySQL ODBC 5.3 Unicode Driver};Server=localhost;Port=3306;Database=db_hptms;Uid=root;Pwd=123456;OPTION=3;"conn.Openrs.Open"select fdEmpNo,fdEmpName from tbUser", connWithThisWorkbook.Worksheets("MySqlData").Visible =True.Range("a1:b1").Value = Array("EmpNo","EmpName").Range("A2").CopyFromRecordset rs.ActivateEndWithrs.Close:Setrs =Nothingconn.Close:Setconn =NothingMsgBox"处理完毕", vbOKOnly,"提示信息"EndSub

上述示例经过测试，可以正常连接到Mysql数据库，这里注意使用的ODBC连接的版本是32位，在测试中，使用64位的，始终无法正常打开连接。

❷ 求教VBA连接SQL数据库的详细方法及解释。

1、基本上所有的数据库都有对应的写法（有些数据库是要装连接驱动才能连），比如"Provider=Microsoft.Jet.OLEDB.4.0（用来连接access）或者provider =MSDASQL，而且每种数据库也可能会有多种连接方法（Provider意即数据库引擎），常见的有下面这些

Provider 代码 Provider
ADSDSOObject Active Directory Services
Microsoft.Jet.OLEDB.4.0 Microsoft Jet databases
MSDAIPP.DSO.1 Microsoft Internet Publishing
MSDAORA Oracle databases
MSDAOSP Simple text files
MSDASQL Microsoft OLE DB provider for ODBC
MSDataShape Microsoft Data Shape
MSPersist Locally saved files
SQLOLEDB Microsoft SQL Server
2、参见http://www.w3school.com.cn/ado/met_conn_open.asp#connectoptionenum
3、这样就可以对book1.xlsx中的数据使用sql语法进行操作
4、当你需要返回结果的，比如说你要查询数据库符合某个条件的有几条记录，或者说取出数据库中符合条件的一批记录的时候就要用数据集，单一的conn.execute只能执行操作，不能返回数据，必须配合结果集使用才可取回数据。