vba怎么將excel數(shù)據插入mysql數(shù)庫庫

1、定義連接db的過程：

成都創(chuàng)新互聯(lián)是一家集網站建設,當雄企業(yè)網站建設,當雄品牌網站建設,網站定制,當雄網站建設報價,網絡營銷,網絡優(yōu)化,當雄網站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網站。

Dim oConn As ADODB.Connection

Private Sub ConnectDB()

Set oConn = New ADODB.Connection

oConn.Open "DRIVER={MySQL ODBC 5.1 Driver};" _

"SERVER=localhost;" _

"DATABASE=yourdatabase;" _

"USER=yourdbusername;" _

"PASSWORD=yourdbpassword;" _

"Option=3"

End Sub

2、執(zhí)行db插入的具體寫法：

Dim rs As ADODB.Recordset

Private Sub InsertData()

Set rs = New ADODB.Recordset

ConnectDB

With wsBooks

For rowCursor = 2 To 11

strSQL = "INSERT INTO tutorial (author, title, price) " _

"VALUES ('" esc(.Cells(rowCursor, 1)) "', " _

"'" esc(.Cells(rowCursor, 2)) "', " _

esc(.Cells(rowCursor, 3)) ")"

rs.Open strSQL, oConn, adOpenDynamic, adLockOptimistic

Next

End With

End Sub

你好，vba，想把excel單元格的內容寫入mysql，sql語句應該怎樣寫??？把單元格的內容寫進去

你的sql語句是什么?如果用到A1單元格,我打個比方吧,

mysql="select a,b from table where a=' " range("A1") "'"

判定單元格是什么用以下代碼

If Range("A1").HasFormula = True Then

MsgBox "單元格為公式"

ElseIf IsNumeric(Range("A1")) = True Then

MsgBox "單元格為數(shù)值"

Else

MsgBox "單元格為文本"

End If

vba excel導入mysql

我有一個較為簡單的辦法

不用VBA編程

如果你知道SQL語句的寫法

可以利用EXCEL中的公式直接生成對應的 SQL插入語句

然后把這個語句復制到文本文件保存，直接在MYSQL中執(zhí)行就行了

我就是這么做的

寫VBA太麻煩

文章名稱：vba怎么寫入mysql vba錄入
文章地址：http://jinyejixie.com/article8/docpcip.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供微信小程序、電子商務、企業(yè)建站、網站設計、全網營銷推廣、微信公眾號

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)