vb.net获取excel选中select的值

在VB.NET中，如果你想要获取Excel工作簿中当前选中的单元格的值，可以使用`Microsoft.Office.Interop.Excel`命名空间下的`Application`和`Range`类。以下是一个简单的例子：

Imports Microsoft.Office.Interop.Excel

Public Sub GetSelectedCellValue()
    ' 获取当前活动的工作簿
    Dim excelApp As New Application
    Dim workbook As Workbook = excelApp.ActiveWorkbook
    Dim worksheet As Worksheet = workbook.Worksheets(workbook.Sheets(1)) ' 假设第一张表为活动工作表

    ' 获取选中的范围
    Dim selection As Range = worksheet.Selection

    ' 检查是否有单元格被选中
    If Not selection Is Nothing Then
        ' 获取并打印选中单元格的值
        Dim cellValue As Object = selection.Value2 ' Value2适用于包含日期、错误或空值的单元格
        Console.WriteLine("选中单元格的值： " & cellValue)
    Else
        Console.WriteLine("没有选择任何单元格")
    End If

    ' 关闭引用
    excelApp.Quit()
End Sub

这个函数首先打开Excel应用，找到活动工作簿和工作表，然后检查是否选择了单元格。如果有，则获取其值；如果没有则提示。