1. 程式人生 > >VBA連線mysql本地資料庫

VBA連線mysql本地資料庫

  1. 下載 & 配置ODBC
    • ODBC的位數需要與Excel保持一致
    • 開啟Excel,開啟工作管理員,選擇程序,檢視Excel,字尾為32,表示當前Excel為32位
    • 開啟ODBC,開始 - 執行 - C:\Windows\SysWOW64\odbcad32.exe,直接搜尋ODBC開啟的是64位的資料來源管理器,無法查到剛安裝的32位MySQL ODBC,務必確認開啟的資料來源管理器與應用程式位數一致
    • 配置ODBC,userDSN - add-選擇剛安裝的ODBC - 配置要連線的資料庫相關資訊(伺服器,埠,資料庫名(可以為空),使用者名稱,密碼)
  2. 連線資料庫並匯入資料到Excel
    • 方法一,Excel自帶資料匯入工具
      • data - GetExternalData - fromOtherSources - fromDataConnectionWizard - ODBC DSN - 剛配置的資料來源 - 彈出框中選擇資料庫和表
    • 方法二,程式碼連線
      ‘!!tools-references-MicroSoft Activex Data Objects x.x Library
Private Sub ConnectDB()
Dim oConn As ADODB.Connection '
Set oConn = New ADODB.Connection
Dim str As String
str = "DRIVER={MySQL ODBC 5.3 Unicode Driver};SERVER=rds56392do681d35if07.mysql.rds.aliyuncs.com;PORT=3306;DATABASE=test;UID=test;PWD=test"
oConn.Open str oConn.close End Sub