DoCmd传输电子表格在Windows 10中不起作用

问题描述 投票:0回答:1

我有一个模块可以在升级到Windows 10之前创建的Access DB中使用。导出完全相同,但是在Windows 10中不起作用。我对VBA来说是比较陌生的,所以请放轻松在我身上。

我复制了可以正常工作的数据库并更新了表名,但仍然无法导出。

除导出外,一切正常:

Public Sub DmwExport()
Application.SysCmd acSysCmdSetStatus, "Exporting Files"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "TABLE NAME", "FILE LOCATION " & Format(Date - Weekday(Date), "mm-dd-yy") & ".xlsx", True
End Sub

数据库的行为就像它正在导出文件一样,大约需要30秒钟,但是当我转到文件位置时,文件不存在。我在网络共享驱动器和PC的本地驱动器上尝试过,结果为零。我已经编译数据库,没有错误,所以我不确定哪里出错了。我所有的参考资料也都使用15.0版本进行了检查。上面的代码对以前创建的数据库没有问题,但是在此数据库中不会成功。我尽力了。非常感谢您的帮助。

access-vba
1个回答
0
投票

已添加到此帖子中。有一个参考文件和驱动程序,需要将其添加到新的Windows10版本的本地MS Access应用程序中。只是无法查明所需的确切MSI OCX或DLL名称(可以在Microsoft下载站点中搜索。)您在TransferSpreadsheet上的导出问题也发生在IMPORT函数上:

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "targettable", "outsidesourceXLSfileobject", True, "XLS worksheetRange"   
© www.soinside.com 2019 - 2024. All rights reserved.