从Excel自动加载到Access中

从Excel自动加载到Access中,excel,ms-access,vba,ms-access-2010,Excel,Ms Access,Vba,Ms Access 2010,请参阅下面的代码,此时它加载范围为“A1:G30000”的数据。我想更改此代码,以便加载A1:D30000和F1:G30000范围内的数据,即上传时不包括F列中的数据 strFile = Dir(strPath & "*.xlsx") Do While Len(strFile) > 0 strPathFile = strPath & strFile DoCmd.TransferSpreadsheet acImport, acSpreadshe

请参阅下面的代码,此时它加载范围为“A1:G30000”的数据。我想更改此代码,以便加载A1:D30000和F1:G30000范围内的数据,即上传时不包括F列中的数据

 strFile = Dir(strPath & "*.xlsx")
 Do While Len(strFile) > 0
       strPathFile = strPath & strFile
       DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, _
             strTable, strPathFile, blnHasFieldNames = False, _
             "Data!A1:G30000,"
或使用:

"Data!A1:D30000;Data!F1:G30000"
或:

或打开Excel并定义覆盖此复合范围的命名范围:

=Data!$A$1:$D$30000,Data!$F$1:$G$30000

然后在代码中引用指定给该命名范围的名称。

将代码中的
A1:G30000
更改为
F1:G30000
?这将如何使A1:d30000范围内的数据能够加载?为什么不加载整个工作表并在MS Access中进一步处理?
=Data!$A$1:$D$30000,Data!$F$1:$G$30000