Импорт более чем 65,535 строк в MS Access из Excel
Я запускаю следующий код, чтобы импортировать весь лист из Excel для доступа, лист имеет 77 тыс. Строк, но Access импортирует только 65,535, есть какие-то сомнения по поводу того, как это исправить? И Excel, и Access - версия 2013.
Function importa()
Dim rs As DAO.Recordset
Dim inicio As String
Dim fim As String
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, _
"NOMEBASE", Application.CurrentProject.Path() + "\Abre_Envio_Novo_Layout.xlsm", True, "Menu!BJ25:BM26"
Set db = CurrentDb()
Set rs = db.OpenRecordset("NOMEBASE")
inicio = rs.Fields(2).Value
fim = rs.Fields(3).Value
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, _
"BASE", Application.CurrentProject.Path() + "\Abre_Envio_Novo_Layout.xlsm", True, "Mailing_Recebido!A:AX"
rs.Close
End Function