当然可以呀
数据库名->abc.xls->abc
表名->sheet1
表中字段名->第一行对应的列值->A1、B1...
字段的值->A2、A3..B2、B3、...

解决方案 »

  1.   

    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=c:\somepath\myExcelSpreadsheet.xls;" & _
              "Extended Properties=""Excel 8.0;HDR=Yes;"";"
      

  2.   

    我是连接是成功的。但在 "select * from sheet1"的时候出错。我看到一种写法:“select * from sheet1$"但还是不行。请各位指点,多谢!附:
        Dim Conn As New ADODB.Connection
        Dim Rst As New ADODB.Recordset
        
     
        Conn.Open "Driver={Microsoft Excel Driver (*.xls)};" & _
                       "DriverId=790;" & _
                       "Dbq=D:\练习\Excel数据库\cx.xls;" & _
                       "DefaultDir=D:\练习\Excel数据库;"
        '连接没报错,但在下面这句时报一个找不到对象sheet1的错误
        Rst.Open "select * from sheet1", Conn
      

  3.   

    Rst.Open "select * from [sheet1$]", Conn
      

  4.   

    对,象楼上兄弟所说的
    Rst.Open "select * from [sheet1$]", Conn,....
    其中sheet1 是表单名,