我们公司正在使用 Office 365 Pro Plus 的半年更新频道。最近我们从版本 1708 更新到了 1803。
我们正在使用一些自动化宏，而不是从 SharePoint 在线租户打开文件。自更新以来，调用了 Workbooks.open("https://xxxxxx.sharepoint.com/sites/.../xxx.xlsx”）现在每次都会提示输入O365用户名和密码，并且不要使用用作Excel帐户的用户名和密码。
It opens a "blank" workbook (see screenshot) :
本地文档上的 Workbooks.open() 仍然像以前一样工作，只有从 SP Online 打开文件才会出现此问题。
我尝试在电脑上切换到每月频道，但问题仍然存在。 使用链接手动打开文件是有效的。
这是我们正在使用的示例代码：
Sub Transfert_SST_Copy()
Dim Tbl As ListObject
Dim NewRow As ListRow
Dim Data As ListRow
Dim Wb As Workbook
Set Wb = Workbooks.Open(Filename:="https://xxxxx.sharepoint.com/:x:/r/sites/XXX/AMTB%20RFQ%20costing/00%20General/Overview%20RFQs/Cost%20computations%20simple%20overview/2018%20AMTB_Cost_computations_overview_simple.xlsm?d=w8929b5112ed7496bb25d82b0bfc472c5&csf=1&e=PADrRt", ReadOnly:=False)
' Here Excel opens a "Blank" Workbook, so everything after that is giving an error
Set Tbl = Range("CostCalcOverview").ListObject
Set NewRow = Tbl.ListRows.Add(AlwaysInsert:=True)
NewRow.Range.Offset(0, 1).Resize(1, ThisWorkbook.Worksheets("Transfert").Range("A275:AW275").Count).Value = ThisWorkbook.Worksheets("Transfert").Range("A275:AW275").Value
End Sub
嗨，我遇到了同样的问题 - 这对我来说很重要，因为这似乎是一件很容易的事情！ 问题出在您的文件名链接上。
Set Wb = Workbooks.Open(Filename:="https://xxxxx.sharepoint.com/:x:/r/sites/XXX/AMTB%20RFQ%20costing/00%20General/Overview%20RFQs/Cost%20computations%20simple%20overview/2018%20AMTB_Cost_computations_overview_simple.xlsm?d=w8929b5112ed7496bb25d82b0bfc472c5&csf=1&e=PADrRt", ReadOnly:=False)
当您单击“共享”或“复制链接”时，您使用的文件名链接直接来自 SharePoint，但对我来说解决此问题的方法是在 Desktop Excel 中实际打开 SharePoint 文件。然后单击“文件”。然后，您将看到显示文件名的“信息”页面 - 如果您直接查看文件名下方（在“保护工作簿”上方），看起来就像面包屑链接（来自 SharePoint 的文件夹名称用 >> 分隔） -单击该部分，然后单击“将路径复制到剪贴板”
用此替换代码中的文件名链接，它将起作用！