如何从excel读取数据 [英] How to read data from excel
本文介绍了如何从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屋!
查看全文