EXCEL VBA-将文件从一个目录复制到另一个目录

Question

我在FileCopy行上收到运行时错误'52'（文件名或数字错误）。 字符串变量似乎具有正确的文件位置，并且手动完成后文件可以正常打开。 不知道我在做什么错。

Sub copyOver()
Dim sourceFile, destFile As String
Dim fle As Variant

destFile = Sheet11.Range("A1").Value
For Each fle In Sheet11.Range("A2:A5")
    sourceFile = fle.Value
    FileCopy sourceFile, destFile
Next fle

End Sub

Answer 1

您需要传递sourceFile和destFile完整路径（包括文件名）