使用vba TransferSpreadsheet将Aaccess表与Excel链接

Question

我正在尝试将Excel与SharePoint链接，以便能够使用Excel在SharePoint中进行读/写。

我尝试了很多方法，但我总是收到错误“无法连接到服务器”，因此我尝试将SharePoint与MS Access中的表链接起来，并使用“TransferSharePointList”进行工作。

现在，要在Excel中解决此错误，我将使用excel链接MS Access中的该表。我尝试使用TransferSpreadsheet，但我将Excel中的表格设置为空，并在Access中添加照片。

以下是我在MS Access中的代码：

    DoCmd.TransferSharePointList acLinkSharePointList, SERVER, LISTNAME, VIEWNAME, TableName, True
    DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel12Xml, "Prices", "C:\Users\Desktop\1.xlsx", True
    CurrentDb.TableDefs.Refresh
End Sub

有人能告诉我为什么我在Excel中将表格清空。

Answer 1

您缺少工作表名称：

DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel12Xml, "Prices", "C:\Users\Desktop\1.xlsx", True, "Sheet1$"   '<-- Sheet name
CurrentDb.TableDefs.Refresh

Answer 2

我认为就是这样。

DoCmd.TransferSpreadsheet, acLink, , "xlData", strFileName, True

有关详情，请参阅以下网址。

http://access-excel.tips/access-vba-cocmd-transferspreadsheet/