在链接的Excel中用Sharepoint列表更改视图

有人可以帮助我如何在Excel中更改视图,这与Sharepoint中的列表有关? 这是我的VBA代码:

Sub link_edit_Mode() Dim mySh As Worksheet Dim spSite As String Set mySh = Sheets("one") Dim src(0 To 1) As Variant spSite = " url " 'site name src(0) = spSite & "/_vti_bin" src(1) = "{lists GUID}" 'GUID mySh.ListObjects.Add xlSrcExternal, src, True, xlYes, mySh.Range("A1") End Sub 

它工作,但它给了我从共享点的表,它具有默认视图,但我需要改变这个观点。

你需要在你的代码中做一些小的修改(见下文)

 Sub link_edit_Mode() Dim mySh As Worksheet Dim spSite As String Set mySh = Sheets("one") Dim src(0 To 2) As Variant spSite = " url " 'site name src(0) = spSite & "/_vti_bin" src(1) = "{lists GUID}" 'GUID src(2) = "{view GUID}" mySh.ListObjects.Add xlSrcExternal, src, True, xlYes, mySh.Range("A1") End Sub