我试图这样:

    'start Excel app
    Dim exApp As Microsoft.Office.Interop.Excel.Application
    exApp = CreateObject("Excel.Application")

    ' load excel document
    exApp.Workbooks.Open(fname)
    Dim exSheet As Microsoft.Office.Interop.Excel.Worksheet
    exSheet = exApp.Workbooks(1).Worksheets(1)

和比,例如访问 “C3” 细胞:

 Dim b As String
 b = exSheet.Cells("A3")

或:

b = exSheet.Cells(3,3)

和它抛出我异常。我觉得我做得不对的对象访问,但是这种方法在嵌入式VB工作,并在.NET不工作。 此外,试图给Google的异常代码,没有相关的结果。

有帮助吗?

解决方案

尝试:

b = exSheet.Range("A3").Value.ToString

其他提示

我不认为你应该写在VB6风格代码vb.net。

看代码的例子,我想你需要的是

b = exSheet.Cells(3,3).Text

b = exSheet.Cells(3,3).Value

编辑:我想它的参考应该被分配到的范围中的实例,点击。 因此,代码可能看起来像

Range exampleRange = exSheet.Cells(3,3)
b = exampleRange.Text 'OR it can be b = exampleRange.Value
许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top