PB讀取任何格式excel只要指定開始和結束的行列

2021-08-25 11:38:43 字數 1595 閱讀 8591

pb讀取任何格式excel只要指定開始和結束的行列

//從excel檔案獲得資料 

//建立從excel表獲取資料的通道  

oleobject   ole1  

int result ,ll_rtn,i,row,col

string ls_pathname,ls_filename

long ll_firstrow,ll_firstcol

long ll_endrow,ll_endcol

string ls_cell,ls_desc

ole1=   create   oleobject  

if   result<>0   then 

messagebox("提示!","連線excel表出錯,請重新選擇") 

return  

end   if  

string ls_word

ls_word =

//操作員選擇要匯入資料的excel檔案 

ll_rtn   =   getfileopenname('開啟檔案',ls_pathname,ls_filename,'xls','excel檔案(*.xls),*.xls')  

if   ll_rtn<>1   then 

messagebox("提示!","連線excel表出錯,請重新選擇") 

return  

end   if  

ole1.workbooks.open(ls_pathname,0,0)  

ole1.visible   =   true  

//指定開始行,開始列,結束行,結束列

ll_firstrow=1 

ll_firstcol=1

ll_endrow=30

ll_endcol=3

//從使用者指定行指定列讀取資料到dw.

for row = ll_firstrow  to ll_endrow

for col = ll_firstcol to ll_endcol

ls_cell   =   string(ole1.workbooks[1].worksheets[1].cells(row,col).value) 

i = dw_1.insertrow(0)

dw_1.setitem(i,'irow',row)

dw_1.setitem(i,'icol',col)

dw_1.setitem(i,'svalue',ls_cell)

dw_1.setitem(i,'ss',ls_word[col] + string(row) )

ls_desc += ls_word[col] + string(row) +'=' + string(ls_cell) + '~r~n'

next

ls_desc += '~r~n'

next

mle_1.text = ls_desc

ole1.visible   =   false  

ole1.workbooks.close()   

ole1.quit()

ole1.disconnectobject() 

//斷開與ole的連線

destroy   ole1   

XCode讀取Excel資料(適用於任何資料庫)

雖然是充血模型,雖然是強型別,xcode同樣支援遍歷任何資料庫結構,並以強型別 相對於dataset等字典訪問 方式讀取資料。要遍歷資料庫結構是很容易的事情,絕大多數orm都支援。但是在沒有實體類的情況下以強型別方式讀取資料,就稍微有些複雜。xcode的原理是為每張表動態建立繼承自entity 的實...

xlrd批量讀取xls格式excel檔案資料。

要提取所有excel檔案裡的藍色標記的資料到一張表裡 效果如下 主要採用了xlrd獲取xls檔案的單元格資料。後面用pandas存放資料並轉成了excel檔案。中間又加了一點多執行緒的東西。其實呢這個例子只有5個檔案,用不用多執行緒沒什麼影響.速度都很快.0.1秒就可以完成了。最近一直在一點點地學習...

POI對EXCEL中時間格式資料的讀取

1 excel儲存日期 時間均以數值型別進行儲存,讀取時poi先判斷是是否是數值型別,再進行判斷,判斷數值 hssfcell.cell type numeric cell.getcelltype 2.日期格式 處理yyyy mm dd,d m yyyy h mm,hh mm 等不含文字的日期格式 1...