vb中從excel中撈取資料插入表中!

2021-05-04 01:26:19 字數 1442 閱讀 3359

**實現的功能是:從指定的

excel

檔案中抓取一些資料插入表中

控制點 1

指定的excel

中要有sheet

2sheet

中要有乙個名為

「upload」

的檔案

**如下:

'check sheet's names must contain upload

intcsheet = xlbook.worksheets.count

if intcsheet = 0 then

msgbox "the execl file " & strfilename & " has no data!"

xlbook.close (true) '

關閉excel

工作簿xlexcel.quit '

關閉excel

set xlexcel = nothing '

釋放excel

物件insert_tepmtable = false

exit function

end if

for inti = 1 to intcsheet

if ucase(xlbook.worksheets(inti).name) = "upload" then

exit for

end if

next

if inti > intcsheet then

msgbox "the execl file " & strfilename & " has no upload sheet !"

xlbook.close (true) '

關閉excel

工作簿xlexcel.quit '

關閉excel

set xlexcel = nothing '

釋放excel

物件insert_tepmtable = false

exit function

end if

set xlsheet = xlbook.worksheets("upload")

'get excel's data

with xlsheet

for intj = 2 to 65535

if len(trim(.cells(intj, 1).value)) <> 0 then

strsql = "insert into tmp_uploadprice" & _

" values(" & clng(.cells(intj, 1).value) & _

",'" & cstr(.cells(intj, 2).value) & _

"',' '" & _

"," & cdbl(.cells(intj, 4).value) & ")"

dbsbpcs.execute strsql

edn if

next

python從excel中讀取資料

參考文獻 讀取excel 資料需要用到xlrd或者openpyxl模組,所以先安裝xlrd openpyxl 直接pip install xird openpyxl xlrd和openpyxl區別 1.xlrd能處理的最大行數為65535,超過這個行數的檔案就需要用到openpyxl,openpyx...

python從Excel中讀取資料

常用語法 file xlrd.open workbook 檔案路徑 開啟excel檔案 sheet info.sheet by name 工作表名稱 根據表名獲取工作表 rows num sheet.nrows 獲取表的行數 cols num sheet.ncols 獲取表的列數 rows shee...

C 從將資料匯出到excel中

httpwebrequest學習 httpwebrequest物件的建立 不是利用new關鍵字通過構 造函式來建立的,而是利用工廠機制 factory mechanism 通過create 方法來建立的。c httpwebrequest提交資料方式1.get方式 描述 get 方式通過在網路位址附加...