Я пытаюсь импортировать данные из Sharepoint в файл Excel. Я написал скрипт vba, который позволяет мне импортировать представление списка. У меня проблема в том, что некоторые столбцы импортируются в виде формул, а не значений. Поскольку некоторые из столбцов, которые используются в формулах, не включены в представления, вычисленные столбцы возвращаются как 0. Есть ли способ импорта значений вместо формул, как это делается при экспорте списка непосредственно из Sharepoint.
Private Function GetListByName() As Boolean
Const ListName As String = "ListName"
Const ViewName As String = "ViewName"
Dim tblRange As Range
GetListByName = False
On Error GoTo 0 'SharepointImportErr
With Data
.Cells.ClearContents
.ListObjects.Add xlSrcExternal, _
Array(Server & Customer & "/_vti_bin", "{" & ListGUID(ListName) & "}", "{" & ViewGUID(ListName, ViewName) & "}") _
, False, , .Range("A1")
With .ListObjects(1)
Set tblRange = .Range
.Unlink
.Unlist
tblRange.ClearFormats
End With
End With
Set tblRange = Nothing
GetListByName = True
Application.StatusBar = False
Exit Function
SharepointImportErr:
Application.StatusBar = False
End Function