[表格类模板]Excel_VBA与数据库Access整合笔记下.pdf

记制作：加肥猫 Email:j ungj @163.com QQ:403479502 20:00 21:00 在线 ·实例3-35 多表查询（左外连接LEFT OUTER JOINT ） 引用：microsoft activex data obj ects2.x library Public Sub3_35() Dim mydata As String, SQL As String Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Dim i As Integer ActiveSheet.Cells.Clear ‘清除工作表的全部数据 mydata = ThisWorkbook.Path \职工管理.mdb ‘建立与数据库的连接 Set cnn = New ADODB.Connection With cnn .Provider = microsoft.j et.oledb.4.0 .Open mydata End With ‘查询数据表