使用完整的文件路径作为目标文件名。
示例代码:
Dim filePath As String
Dim fileName As String
filePath = "C:\Users\UserName\Documents\"
fileName = "data.xlsx"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "tableName", filePath & fileName, True
在上面的代码示例中,我们将文件路径和文件名分开使用,然后将它们组合在一起作为目标文件名。这确保了TransferSpreadsheet命令不会将文件保存到默认的文档文件夹中,而是将其保存到指定路径的正确位置。