菜鸟请教问题了：有关VB中Excel的应用。

Question

我是菜鸟，那位大侠能指导一下怎么在VB中从一个Excel表中取数据啊？
这样可以吗？:
   Dim xlApp As Object
   Dim xlBook As Object
   Dim xlSheet As Object
   
   xlSheet=GetObject("*:\*\*.xlt")   '给一个变量赋表中的值
   X=xlSheet.Cells(2,2)多谢各位了!!!!

Answer 1

引用----------'Microsoft Excel X.0 Object Library'
    Dim xlApp As New Excel.Application
    Dim xlBook As Excel.Workbook
    Dim xlSheet As Excel.Worksheet
    
    Set xlBook = xlApp.Workbooks.Open("c:\Book1.xls")
    Set xlSheet = xlBook.Worksheets("sheet1")
    x = xlSheet.Cells(2, 2)
    MsgBox x