execl用宏查询mysql_关于EXCEL能否用宏直接连到oracle数据库然后取数据
oracle俺不大用,但是sqlserver下是沒有問題的,所以俺覺著oracle也問題不大。sqlserver下是這么使用的,建立一個dsn,然后從excel中連接就可以了,部分代碼如下:
Public startline As Integer '數據起始行
Public endline As Integer '數據終止行
Public bankcard As String '銀行卡號列
Public studentno As String '學生學號列
Sub pk()
'本過程的作用為根據學號從SqlServer數據庫中取出對應的銀行卡號到指定的數據列
Dim myxh As String '暫存select查詢中的學號
Dim querystring As String '存儲select查詢語句
Dim cellrange As String '指定查詢出的卡號應放置的單元格位置
Dim id As Integer '用于打開一個數據連接
Worksheets(1).Activate
Application.ScreenUpdating = False '關閉屏幕自動更新
id = SQLOpen("DSN=xssfw")
UserForm1.Show '顯示參數指定窗口
For i = startline To endline
myxh = Cells(i, studentno)
querystring = "select kh from xszd where xh='" & myxh &"'"
SQLExecQuery id, querystring
Setoutput = Range(bankcard & CStr(i)) '指定輸出位置
'默認下SQLRetrieve的返回值中含有標題行,因此將對應的參數設置為False
SQLRetrieve id, output, , , False, False, False
Next
sqlclose id
End Sub
俺也是剛剛學習,還請高手們多多指點。
總結
以上是生活随笔為你收集整理的execl用宏查询mysql_关于EXCEL能否用宏直接连到oracle数据库然后取数据的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: stm8s103k3 周期 捕获_STM
- 下一篇: Oracle表无法expdp,{Orac