发布网友
共1个回答
热心网友
Sub Macro1()
Workbooks.OpenDatabase Filename:="D:\工具集\源程序\CTP.mdb", CommandText:=Array("abcd"), CommandType:=xlCmdTable 'abcd为CTP.mdb表名
End Sub