0

用户正在处理保存在 SharePoint 库中的 Excel Online 中的 Excel 文件。我需要能够刷新完整桌面 Excel 中文件中的一些数据，因此需要知道文件中是否有人阻止我在完整桌面中打开文件并更新相关表格。

我看到的所有代码似乎都与处理映射或共享驱动器以及我之前成功使用的完整桌面 Excel 相关，但该代码不适用于保存在 SharePoint 上并在 Excel Online 中打开的文件。

此链接末尾的代码看起来很有希望，但它不起作用 - 在代码开头返回对象所需的错误，或者如果我取出前三行代码以使代码运行它返回一个只读文件，即使当文件可用。

有没有办法做到这一点？

检查 SharePoint 365 中的工作簿是否已锁定以进行编辑

4

1 回答 1

0

我刚刚从我的一个处理 SharePoint 签入/签出文件的项目中获取了一段代码，以便您查看。显然不是一个完整的过程，但你可以看到它是如何工作的。

                If Workbooks.CanCheckOut(FullPath) Then
                        Workbooks.CheckOut (FullPath)

                        Application.EnableEvents = False
                        Set WB_trgt = Application.Workbooks.Open(FullPath)

                        Call Fix_210124_ClearOutTestData(WB_trgt)
                        
                        If i_ReplaceModules = vbYes Then
                                Call Replace_Modules(WB_trgt)
                                'Call Replace_1_Module(WB_trgt)
                        Else
                                Call Remove_OLD_Modules(WB_trgt)

                        End If


                        WB_trgt.Save

                        With WB_trgt
                                .CheckIn savechanges:=True
                        End With

                End If
于 2022-01-01T17:16:26.553 回答