Excel 2010从分享点列表中获取数据

我需要从SharePoint列表中获取数据。 我遇到了下面的代码，我已经尝试了许多不同的url组合等，但我不断收到

“运行时错误1004”“应用程序定义或对象定义错误”

我对使用SharePoint 2010和Excel 2010的网站拥有完全的pipe理权限

这里我find的代码：

Sub ImportSharePointList() Dim objMyList As ListObject Dim objWksheet As Worksheet Dim strSPServer As String Const SERVER As String = "xxx.xxx.net/sites/tss_PP/Lists" Const LISTNAME As String = "{F915A40C-0394-418C-AB90-xxxxxxxxxxxxx}" Const VIEWNAME As String = "" ' The SharePoint server URL pointing to ' the SharePoint list to import into Excel. strSPServer = "https://" & SERVER & "/_vti_bin" ' Add a new worksheet to the active workbook. Set objWksheet = ActiveSheet Set objMyList = objWksheet.ListObjects.Add(xlSrcExternal, _ Array(strSPServer, LISTNAME, VIEWNAME), True, , Range("A2")) Set objMyList = Nothing Set objWksheet = Nothing End Sub 

任何帮助将是伟大的，只是一个笔记，我已经试过这个有没有视图名称

Answer 1

你的代码在这里工作得很好（Excel 2010，SHP-2007）如果我设置variables如下：

 Const SERVER As String = "shp.myserver.myorg/sites/[mainsite]/[subsite]" Const LISTNAME As String = "Country" ' real List name Const VIEWNAME As String = "" 

服务器：我不包括/列表或任何其他后缀，只能下到子网站级别