2011-06-12 87 views
1

我有这样的代码读取Excel文件错误读取Excel中使用VB.NET

Dim scheduleFileName As String 

    'Creating Excel Object 
    Dim fileName As String 
    fileName = "E:\Vb Deployment\scheduling\scheduleSheet.xlsx" 

    Dim objExcel As New Excel._ExcelApplication 
    Dim objWrkBk As Excel.Workbook 
    Dim objSht As Excel.Worksheet 
    Dim testdata As String 

    objWrkBk = GetObject(fileName) 
    ' or objWrkBk = objExcel.Workbooks.Open("C:\test.xls") 
    objSht = objWrkBk.Worksheets(0) 

    testdata = objSht.Cells(1, 1).Value.ToString() 

但它给在错误上线

objSht = objWrkBk.Worksheets(0) 

错误:未找到成员....

您能否让我知道为什么我得到这个错误以及如何纠正它?

回答

1

Workbook确实有会员Worksheets。唯一缺少的是类型转换

objSht = CType(objWrkBk.Worksheets(0), Excel.Worksheet)