none
Vb.net读取处理Excel都有哪些方法 RRS feed

答案

  • Hi Potato_W,

    第一种方法是添加Microsoft Excel 12.0 Object Library引用来读取excel,具体你可以参照一下链接。

    How to Read an Excel file in Visual Basic.Net

    第二种方法是添加OlebConnection引用来读取excel,你可以看看下面的链接。

    How to read Excel cell from VB.Net

    第一种方法的优点是如果你有了OfficeExcel软件,它会自动调用OfficeAPI,缺点是不能一次性转化成为类似Datatable的数据源。

    第二种方法的优点是代码较为简洁,可以直接转换成为数据源,缺点是需要另外安装microsoft access database engine 2010。

    Best Regards,

    Jack


    MSDN Community Support
    Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.


    2019年12月23日 1:45
    版主

全部回复

  • Hi Potato_W,

    第一种方法是添加Microsoft Excel 12.0 Object Library引用来读取excel,具体你可以参照一下链接。

    How to Read an Excel file in Visual Basic.Net

    第二种方法是添加OlebConnection引用来读取excel,你可以看看下面的链接。

    How to read Excel cell from VB.Net

    第一种方法的优点是如果你有了OfficeExcel软件,它会自动调用OfficeAPI,缺点是不能一次性转化成为类似Datatable的数据源。

    第二种方法的优点是代码较为简洁,可以直接转换成为数据源,缺点是需要另外安装microsoft access database engine 2010。

    Best Regards,

    Jack


    MSDN Community Support
    Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact MSDNFSF@microsoft.com.


    2019年12月23日 1:45
    版主
  • 讲的很好,非常感谢!
    2019年12月29日 14:56
  • 可以用Free Spire.XLS读取和处理Excel,优点是不用安装Office,代码简单。缺点是对xls格式有一定的行数限制(xlsx格式没有)

    //加载Excel文档
    Dim workbook As Workbook = New Workbook()
    workbook.LoadFromFile("F:\Data.xlsx", ExcelVersion.Version2013)
    //获取第一张sheet
    Dim sheet As Worksheet = workbook.Worksheets(0)
    //设置range范围
    Dim range As CellRange = sheet.Range(sheet.FirstRow, sheet.FirstColumn, sheet.LastRow, sheet.LastColumn)
    //读取到datatable
    Dim dt As DataTable = sheet.ExportDataTable(range, True, True)

    2020年2月14日 8:34