使用 VBA 将电子表格传输到 Access 数据库

Transfer Spreadsheet to Access Database with VBA

我有一个浏览按钮,可以选择文件名和路径并将其放置在文本框 5 中。我需要在我的文件名中使用相同的值,但它不起作用。它抛出:

Run Time Error 2522- The action or method requires a File Name argument

Private Sub Command10_Click()
  Dim dbs As DAO.Database
  Dim td As DAO.TableDef
  Dim fileName As String

'set current database
 Set dbs = CurrentDb

 Me.Text5 = fileName

DoCmd.TransferSpreadsheet acImport, , "tblS3DimportTemp", fileName, True
 MsgBox "Data Uploaded!"

End Sub

而不是:Me.Text5 = fileName

写: fileName = Me.Text5

在许多编程语言中,左侧变量获取右侧变量的值。