[轉貼]NPOI，在Excel欄位裡面，取出運算的「值」而非「公式」(v.1.2.1 / v.1.2.4版）

2011-06-09

44468
0
ASP.NET 4.0與 VS 2010
2011-11-30

Q: 讀取 Excel file的時候，某個欄位裡面有「運算公式」，
所以讀到那個欄位，也會抓取到那一段公式？

能否只抓取公式運算後的「值」就好了？

之前介紹過的 NPOI，對於 Excel檔的讀取、輸出 Excel file，威力都非常強大。

http://www.dotblogs.com.tw/mis2000lab/archive/2010/05/07/npoi_excel_vb_asp_net.aspx.aspx

有位網友 Steven711435 提到一個問題，並且熱情地分享解法，

特別要感謝他！！

Q: 讀取 Excel file的時候，某個欄位裡面有「運算公式」，

所以讀到那個欄位，也會抓取到那一段公式？

能否只抓取公式運算後的「值」就好了？

謝謝 Steven711435 辛苦地求解

A: 程式碼如下----

請參閱 http://www.dotblogs.com.tw/mis2000lab/archive/2010/05/07/npoi_excel_vb_asp_net.aspx.aspx

文章裡面第四個範例，

修正 61 ~ 63列的程式碼即可。

If Not row.GetCell(j) Is Nothing Then
      If row.GetCell(j).CellType = NPOI.HSSF.UserModel.HSSFCellType.FORMULA Then
            D_dataRow(j) = row.GetCell(j).StringCellValue
      Else
            D_dataRow(j) = row.GetCell(j).ToString()
      End If
End If

==================================================================================

2011/6/13補充：有朋友反應上面的程式無法執行，以下是我今天測試的結果。(NPOI v.1.2.1版）

'-- 如果格子裡面有「計算公式」的話，只取出運算後的「值」。
'-- 參考資料 http://www.javadocexamples.com/org/apache/poi/hssf/usermodel/org.apache.poi.hssf.usermodel.HSSFCell.html

If row.GetCell(j).CellType = NPOI.HSSF.UserModel.HSSFCell.CELL_TYPE_FORMULA Then

D_dataRow(j) = row.GetCell(j).NumericCellValue '-- 表示格子裡面的值是「數字」

                    Else
                        D_dataRow(j) = row.GetCell(j).ToString() '--每一個欄位，都加入同一列 DataRow
                    End If

另外發現一個問題，可能我的 NPOI版本為 1.2.1版，

所以上傳的 Excel檔案，只能到 Excel 2007版，使用 2010版的檔案會報錯。

==================================================================================

2011/11/30補充： NPOI 1.2.4 版又有修改

上方的命名空間已經簡化。

Imports NPOI.HSSF.UserModel

Imports NPOI.SS.UserModel '== v1.2.4版新增。

                    If row.GetCell(j).CellType = CellType.FORMULA Then    '== v.1.2.4版修改
                        D_dataRow(j) = row.GetCell(j).NumericCellValue
                        '-- 表示格子裡面，公式運算後的「值」，是數字（Numeric）。而非抓到「公式」。
                    Else
                        D_dataRow(j) = row.GetCell(j).StringCellValue   '--每一個欄位，都加入同一列 DataRow
                    End If

網路，因為分享所以偉大！

我將思想傳授他人，他人之所得，亦無損於我之所有；

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----Thomas Jefferson

線上課程教學，遠距教學 (Web Form 約51hr) https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015

線上課程教學，遠距教學 (ASP.NET MVC 約75~88hr) https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

ASP.NET MVC線上課程第一天免費看 (5.5小時)

寫信給我，不要私訊 -- mis2000lab (at) yahoo.com.台灣 或 school (at) mis2000lab.net

ASP.NET遠距教學、線上課程（Web Form + MVC）。 第一天課程， "完整" 試聽。

................ facebook社團 https://www.facebook.com/mis2000lab ......................

................ YouTube (ASP.NET) 線上教學影片 https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/

Blog文章 "附的範例" 無法下載，請看 這裡 ...... https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download

請看我們的「售後服務」範圍（嚴格認定）。

......................................................................................................................................................