FileCopy / MoveFile

Hvad er galt her ? Den vil ikke acceptere at kopiere "*.xls"

Hvordan med MoveFile ... tilsvarende syntax ?

Private Sub AfslutImport_Click()
Dim StartFolder As String
Dim SlutFolder As String

StartFolder = DLookup("[ImportFil]", "tblFilplacering", "[ImportID] = 1")
    SlutFolder = DLookup("[ImportFil]", "tblFilplacering", "[ImportID] = 2")
       
    FileCopy StartFolder & "*.xls", SlutFolder & "*.xls"
 
End Sub