vb.net读取指定位置的Excel表

在VB.NET中，要读取指定位置的Excel表格，你可以利用`Microsoft.Office.Interop.Excel`库来实现。以下是一个示例，假设我们想读取特定的工作表（Sheet1）并定位到A1单元格：

Imports Microsoft.Office.Interop.Excel

Public Class ExcelReader
    Private Sub ReadExcelFile(ByVal filePath As String, ByVal sheetName As String, ByVal cellRange As String)
        Dim excelApp As New Application()
        Dim workbook As Workbook = excelApp.Workbooks.Open(filePath)
        Dim worksheet As Worksheet = workbook.Sheets(sheetName)

        '定位到A1单元格
        Dim range As Range = worksheet.Range(cellRange)

        '读取单元格值
        Dim cellValue As Object = range.Value
        Console.WriteLine($"Cell {cellRange} in {sheetName} of {filePath}: {cellValue}")

        '关闭工作簿和应用程序
        workbook.Close(True)
        excelApp.Quit()
    End Sub
End Class

在这个示例中，`ReadExcelFile`方法接受文件路径、工作表名称以及要读取的单元格范围作为参数。调用时，例如读取C:\example.xlsx文件的Sheet1的A1单元格，可以这样使用：

Dim reader As New ExcelReader()
reader.ReadExcelFile("C:\example.xlsx", "Sheet1", "A1")

请注意，实际应用可能需要处理异常情况，比如文件未找到或无法打开等情况。