如何将数据从 excel 导入到文本框？

Question

我正在尝试将数据从 Excel 导入文本框。

我想从 Excel 导入数据并保存在我的 C: 磁盘上，但 System.NotImplementedException 出现错误我将库用于 Excel 和 Office。

Dim ExcelApp As New Excel.Application
Dim ReteilerWorkbook As New WindowsApp1.ExcelApp.Workbooks.Open("C:\Users\TR.xlsx")
Dim retailerWorksheet As New RetailerWorkbook.Sheets(1)

Private Sub ZPlikuToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ZPlikuToolStripMenuItem.Click

    Me.TextBox1.Text = ""
    TextBox1.Text = retailerWorksheet.cells(1, 1).text
End Sub

我想用单元格 A1 中的数据填充 textbox1

Answer 1

这是我在 VB.NET 从 Excel 导入数据的方法：

首先，我在 VB 模块的头部导入 Interop：

Imports Excel = Microsoft.Office.Interop.Excel

然后我声明如下 INSIDE 例程：

Private Sub ...
    Dim ExcelApp As Excel.Application = New Excel.Application
    Dim ReteilerWorkbook As Excel.Workbook = ExcelApp.Workbooks.Open("C:\Users\TR.xlsx")
...

你可以这样试试吗？

要检索 cells(1,1) 内容，您无需声明 Worksheet。它不补偿努力。所以你可以简单地做到这一点：

TextBox1.Text = ReteilerWorkbook.Sheets(1).Cells(1,1).Text

而且，一如既往，不要忘记在最后关闭工作簿：

ReteilerWorkbook.Close()

如何将数据从 excel 导入到文本框？

How to import data from excel to textbox?

vb.net

excel

notimplementedexception