Ошибка интеграции Sharepoint и Excel VBA

Question

Я столкнулся с проблемой при попытке получить свойства файла из SharePoint через VBA в Excel. (Я не могу опубликовать книгу, но приведенного ниже кода должно хватить).

Код, о котором идет речь:

Private Sub CheckCheckOutStatus()

    Debug.Print Application.Workbooks.CanCheckOut("http://sp.mySharepointDomain.co.uk/myFolderPath/myFile.xlsb")

End Sub

Проблема в том, что на моих клиентских ПК этот оператор всегда возвращает false независимо от того, извлечен файл или нет (они могут извлечь файл вручную, поэтому это не проблема с правами доступа к файлу).

После дальнейших исследований кажется, что мой конкретный компьютер может получить правильное значение из этого кода, и никто другой не может. Также стоит упомянуть, что мой клиент и все ПК / Пользователи, с которыми я это тестировал, все находятся в одной общей сети, поэтому у нас должны быть установлены одинаковые пакеты.

В процессе исключения мы пришли к выводу, что он связан с моим конкретным компьютером (и не важно, кто входит в него, с самим ПК), который способен правильно использовать этот метод.

Мой вопрос ко всем экспертам:

Существуют ли какие-либо клиентские или локальные пакеты / установки / разрешения, которые могут включать или отключать программный доступ к свойствам в SharePoint?

Спасибо, что нашли время прочитать это, и заранее благодарим за любые ваши предложения!

Answer 1

Я не могу проверить это, потому что у меня не установлен SharePoint, но выглядит примерно так ...

Sub test()
Dim docCheckOut As String
docCheckOut = "Filepath&name"
Call UseCheckOut(docCheckOut)
End Sub

Sub UseCheckOut(docCheckOut As String)

    ' Determine if workbook can be checked out.
    If Workbooks.CanCheckOut(docCheckOut) = True Then
        Workbooks.CheckOut docCheckOut
    Else
        MsgBox "Unable to check out this document at this time."
    End If

End Sub