vb.net - 从 Excel 文件中读取值

Question

我想从 12 个 Excel 工作表中获取一个值。有什么方法可以在不打开Excel表格的情况下获取值？我用的是vb.net。如果有一种方法可以在不打开 Excel 文件的情况下读取值，请发布示例代码。谢谢

Answer 1

如果不打开 Excel 文件，则根本无法读取这些值。但您无需打开 Excel 即可读取这些值。

如果文件以 xml 格式保存，会更容易。如果没有，最简单的方法是仍然使用 Excel，但使用 Office Automation 来完成。困难的方法是创建一个 excel 文件解析器 - 对于非开放 xml excel 格式(Office 2003 之前的版本)相当困难 - 困难但仍然可行。

但是，在不打开文件的情况下读取 Excel 电子表格是完全不可能的。

下面是一段代码，您可以使用 Office Automation 从 VB.NET 打开电子表格(它仍然打开文件，依赖于 Excel 自动化 dll，但不需要打开 Excel):

免责声明

以下代码并不打算按原样使用，而只是一个示例，用于指导读者找到自己的解决方案，该解决方案应该经过彻底测试。

' The code below requires you to add references to Office Interop assemblies
' into your VB.NET project  (if you don't know how to do that search Google)

xlApp = New Excel.ApplicationClass
xlWorkBook = xlApp.Workbooks.Open("<YOUR EXCEL SPREADSHEET FILE HERE")
xlWorkSheet = xlWorkBook.Worksheets("sheet1")

range = xlWorkSheet.UsedRange

For rCnt = 1 To range.Rows.Count
    For cCnt = 1 To range.Columns.Count
        Obj = CType(range.Cells(rCnt, cCnt), Excel.Range)
        ' Obj.value now contains the value in the cell.. 
    Next
Next