Преобразование из типа Range в тип String недопустимо. Vb.net

Question

При нажатии кнопки «Загрузить каталог» во время отладки возникает эта ошибка: «Преобразование из типа« Диапазон »в тип« Строка »недопустимо». В Microsoft.VisualBasic произошло необработанное исключение типа «System.InvalidCastException».

        If Trim(.Cells._Default(1, 1)) = "" Then
            MsgBox("Please Enter the Auction No in Cell B2 ", MsgBoxStyle.Information)
            Exit Function
        Else

            StrAuctionNo = Trim(.Cells._Default(1, 1))
        End If

Answer 1

хорошо, вот версия Vb.net:

Public Sub Test()
    dim excel as new Microsoft.Office.Interop.Excel.Application
    Dim workbook As Microsoft.Office.Interop.Excel.Workbook
    Dim cellRange As Microsoft.Office.Interop.Excel.Range
    Dim sheet As Microsoft.Office.Interop.Excel.Worksheet

    workbook = excel.Workbooks.Open("c:\temp\Book1.xls")

    sheet = workbook.Sheets(1)
    cellRange = sheet.Range("A1:B2")
    Dim val As String = cellRange.Cells(2,2).Value

    If String.IsNullOrEmpty(val) orelse val.Trim() = String.Empty Then
        MsgBox("Field missing ....")
    Else 
        MsgBox("OK!!")
    End If

End Sub