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

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 約 135hr)  https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

 

寫信給我,不要私訊 --  mis2000lab (at) yahoo.com.tw  或  school (at) mis2000lab.net

 (1) 第一天 ASP.NET MVC5 完整影片(5.5小時 / .NET 4.x版)免費試聽。影片 https://youtu.be/9spaHik87-A 

 (2) 第一天 ASP.NET Core MVC 完整影片(3小時 / .NET Core 6.0~8.0)免費試聽。影片 https://youtu.be/TSmwpT-Bx4I 

[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm  。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b  


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

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

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

ASP.NET MVC  => .NET Core MVC 線上教學  ...... 第一天課程 完整內容 "免費"讓您評估 / 試聽

[遠距教學、教學影片] ASP.NET (Web Form) 課程 上線了!MIS2000Lab.主講   事先錄好的影片,並非上課側錄!   觀看時,有如「一對一」面對面講課