日期:2014-05-18  浏览次数:20423 次

.net 讀取無規則EXCEL
用VB.NET讀取如下EXCEL
AccountID aa
AccountName bb
Strategies KPI | Q1 | Q2 | Q3 | Q4
1 KPI1 | Q11 Q12 Q13 Q14 |Q21 Q22 Q23 Q24 |Q31 Q32 Q33 Q34|Q41 Q42 Q43 Q44  
1 KPI1 | Q11 Q12 Q13 Q14 |Q21 Q22 Q23 Q24 |Q31 Q32 Q33 Q34|Q41 Q42 Q43 Q44  
1 KPI1 | Q11 Q12 Q13 Q14 |Q21 Q22 Q23 Q24 |Q31 Q32 Q33 Q34|Q41 Q42 Q43 Q44  
1 KPI1 | Q11 Q12 Q13 Q14 |Q21 Q22 Q23 Q24 |Q31 Q32 Q33 Q34|Q41 Q42 Q43 Q44  
1 KPI1 | Q11 Q12 Q13 Q14 |Q21 Q22 Q23 Q24 |Q31 Q32 Q33 Q34|Q41 Q42 Q43 Q44  
如上所示: 上面是EXCEL中plan_updated SHEET 頁的 內容
我想 把數據 全部 讀出來 使 Strategies,KPI ,Q1, Q2,Q3 ,Q4為列名
目的,能够 得到 AccountID,AccountName的值, 得到各列的值 。幷且 能得到 Q1,Q2,Q3, Q4下 的各列的值。

------解决方案--------------------
参考:
http://www.cnblogs.com/yangbo108/archive/2007/08/13/853295.html
------解决方案--------------------
学习
------解决方案--------------------
不会,帮顶一下
------解决方案--------------------
学习一下!!
------解决方案--------------------
直接打开Excel 文件,在一个一个的读出来.
Set objxl =server.CreateObject("Excel.Application") 
objxl.Visible = false
objxl.AskToUpdateLinks = false
objxL.DisplayAlerts = false
objxl.Workbooks.Open(trim(filename))
j=1
do while true
if trim(objxl.cells(j,1).value)="" then
exit do
else
aa(j)=objxl.cells(j,1).value
end if
j=j+1
loop


参考一下..我这个是ASP的..