从Excel导入超过65.535行的MS Access [英] Importing More Than 65.535 rows to MS Access from Excel

问题描述

我正在运行以下代码将整个工作表从excel导入到访问，该工作表有77k行，但是Access只导入65.535，任何关于如何修复它的问题？ Excel和Access都是2013版。

I'm running the following code to import an entire sheet from excel to access, the sheet has 77k rows, but Access is importing only 65.535, any clur on how to fix it? Both Excel and Access are version 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

推荐答案

acSpreadsheetTypeExcel12 应该是 acSpreadsheetTypeExcel12Xml 用于导入Excel 2010 w orkbook。

acSpreadsheetTypeExcel12 should be acSpreadsheetTypeExcel12Xml for importing an Excel 2010 workbook.

这篇关于从Excel导入超过65.535行的MS Access的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！