【发布时间】：2019-04-23 20:22:28
【问题描述】：
我以前偶尔会收到此错误，但现在每次运行宏时都会收到此错误：
运行时错误“-2147417851 (80010105)”： 对象“_Workbook”的方法“SaveAs”失败
基本上，我尝试做的是将数据从大型个人 Excel 工作簿复制到 Sharepoint 上的 Excel 工作簿。我通过第三个帮助电子表格来做到这一点。此帮助程序电子表格（设置为 ActiveWorkbook）成功打开了两个 Excel 工作表，并在复制和粘贴数据之前进行了一些错误检查。但是现在，它不会保存到 Sharepoint...这是调试器停止的代码块：
我将助手工作簿设置为活动工作簿。我尝试将 SPwkbk 设置为活动工作簿，但这会导致 Excel 崩溃。
我在 Sharepoint 上为 .xlsx 添加了 FileFormat := 1 标签，但这似乎没有效果。
我考虑过一次保存到一个工作表（个人工作表和 Sharepoint 的工作表名称相同），但认为这会使程序比现在慢...
Application.DisplayAlerts = False
SPwkbk.SaveAs Filename:=SPwkbkPath, AccessMode:=xlExclusive, _
ConflictResolution:=Excel.XlSaveConflictResolution.xlLocalSessionChanges
SPwkbk.Close
myWkbk.Close SaveChanges:=False
我知道它可以像以前一样正确复制和粘贴...但我不明白是什么阻止了它保存，即使没有人在 Sharepoint 上编辑/查看文件。这可能是什么原因造成的？
【问题讨论】：
-
这段代码既不复制也不粘贴。它使用
SaveAs方法保存文件（单击链接。）只是猜测：也许以“独占模式”保存与问题有关。此外，在调试完所有内容之前禁用DisplayAlerts也不是一个好主意。除此之外，您需要先弄清楚/澄清您要做什么，然后才能有人提供帮助。