ACCESS如何把链接表导入到本地

郭鑫

ACCESS如何把链接表导入到本地

现有很多张链接表，如果把这些表1次性导入到本地；

竹笛

直接导入表 不要通过链接表的方式 不就好了

程研

先导入EXCEL表，再用ACCESS建立一个链接表即可！

aslxt

参考（要引用ADO）：
Private Sub Command1_Click()
  Dim i
  Dim Rec As ADODB.Recordset
  Set Rec = New ADODB.Recordset
  Rec.Open "select name from msysobjects where type=4", CurrentProject.Connection, adOpenStatic, adLockReadOnly
  DoCmd.SetWarnings False
  For i = 1 To Rec.RecordCount
    Debug.Print Rec.Fields(0)
    DoCmd.RunSQL "select * intO " & Rec.Fields(0) & "_本地表 from " & Rec.Fields(0)
    Rec.MoveNext
  Next i
  DoCmd.SetWarnings True
End Sub