如何从excel读取数据 [英] How to read data from excel

问题描述

如何从excel读取数据

我只能读取一个单元格

任何读取整个数据范围的方法（列）

例如A1

1

3

56

  Imports  Excel = Microsoft.Office.Interop.Excel 
 
  Public   Class  Form1 
 
  Dim  s  As  新系列
  Dim  APP  As  新 Excel.Application 
 
  Dim 工作表作为 Excel.Worksheet 
 
  Dim 工作簿作为 Excel.Workbook 
 结束  Sub  
 
 私有  Sub  Button2_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs）句柄 Button2.Click 
 workbook = APP.Workbooks.Open（  C：\ TestSolder1 \ Test.xlsx）
 
 worksheet = workbook.Sheets.Item（ 1 ）
 
 
 TextBox1.Text = worksheet.Range （  A1）。值
 
 
 TextBox2.Text = worksheet.Range（  B1）。价值
 
 APP.ActiveWorkbook .Close（ False ，  C：\ TestSolder1 \Test.xlsx）
 
 APP.Quit （）
 
 
 结束  Sub  
 结束 类 

解决方案

< blockquote>检查出来：读写Excel文件 [ ^ ]

how to read data from excel
i'm only able to read a cell
any method to read whole range of data (columns )
e.g A1
1
3
56

Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

    Dim s As New Series
    Dim APP As New Excel.Application

    Dim worksheet As Excel.Worksheet

    Dim workbook As Excel.Workbook
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        workbook = APP.Workbooks.Open("C:\TestFolder1\Test.xlsx")

        worksheet = workbook.Sheets.Item(1)
       

        TextBox1.Text = worksheet.Range("A1").Value


        TextBox2.Text = worksheet.Range("B1").Value

        APP.ActiveWorkbook.Close(False, "C:\TestFolder1\Test.xlsx")

        APP.Quit()

      
    End Sub
End Class

解决方案

Check this out: Read and Write Excel Files[^]

这篇关于如何从excel读取数据的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！