在文件A中,有表aa
在文件B中,有表bb
要打开文件,须进行以下操作.
SQL调用另一文件的通信方式
Function WithSqlReturnExcelRecordSet(Sql As String, InputFileName) As ADODB.Recordset
   Dim rst As New ADODB.Recordset
   Set Cnn = New ADODB.Connection
   Cnn.Open "Provider = MicroSoft.Jet.OLEDB.4.0; Extended Properties = 'Excel 8.0;imex=1'; Data Source = " & InputFileName
     
   rst.Open Sql, Cnn, adOpenStatic
   Set WithSqlReturnExcelRecordSet = rst
End FunctionSQL建立本文件的通信方式
Function ConnectRst(Sql As String) As ADODB.Recordset
    Dim Cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Cnn.Open "provider=microsoft.jet.oledb.4.0;extended properties='excel 8.0;imex=1';data source=" & ThisWorkbook.FullName
    rst.Open Sql, Cnn, adOpenStatic
    Set ConnectRst = rst
End Function问:用SQL+JOIN语句能实现上述要求吗?